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To write an adventure program, you need 
to know a bit about the language BASIC. 
You can still have fun with this book, 
though, without knowing any BASIC, by 
typing in and playing the game Ha un ted 
House which was written specially for it. If 
you want to learn or improve your BASIC, 
there are two Usborne books to help you: 
Introduction to Computer Programming 
and Better BASIC. 








About this book 

Writing an adventure game from scratch is 
quite a daunting task, especially if you are 
new to computer programming. This book 
allows you to start as gently as you like by 
giving you an adventure listing which you 
can type in and play, change and add to as 
much as you like, or use as a skeleton 
program for your very own adventure story. 

The game written for this book is called 
Haunted House and you will find the main 
listing for it on pages 33-38. This will work 
on any computer which uses Microsoft- 
style BASIC, including BBC, Dragon, Oric, 
TRS-80 and expanded VIC 20, and has 
changes to make it work on a 48K Spectrum 
(Timex 2000). A special ZX8 1 (Timex 1000) 
version of the game is listed on pages 39-45. 
Turn straight to these pages if you want to 
play the game before you find out how it 
works. It is a specially good idea to do this if 
you’ve never played an adventure game . 


On pages 6-15, you will find out how to 
plan an adventure and on pages 16-27 how 
to structure and write the program for it. 

You may find this section quite difficult. 
Don’t worry if you do, just work through 
each bit slowly and carefully until you feel 
you have grasped the ideas in it, then go on 
to the next bit. 

As you work through these pages it is a 
good idea to write a practice game of your 
own, following each step carefully. Don’t 
worry if it isn’t a specially good game; it will 
help you to understand how the program 
works and see the problems you need to 
solve in order to write an adventure. A good 
adventure needs careful planning to make 
it interesting and exciting to play. 
Remember, you don’t need to touch your 
computer until you have planned your 
game down to the last detail. 

You will find some extra tips and hints on 
adventure writing on page 46, and on page 
47 there are answers to the puzzles set in the 
book. 

After playing Ha un ted House a few 
times, you will probably want to make 
changes to it. Pages 28-3 1 give you some 
ideas for producing your own version. 


If you are used to looking at program 
listings, you will probably pick up a few 
clues about how the game works as you 
type it in. To avoid this, you could try to 
persuade someone else to type it in for you. 

As the program is so long and 
complicated, you will need to type it in 
extremely carefully. It is worth typing 
slowly and checking each line as you go, as 
need do it once. You can save the 
on tape for when you want to play 
rin or produce an adapted version. 


r What are the rules? 


If you have played an adventure game 
before you will know what to expect 
from Haunted House. If you haven’t, all 
you need to know is that the computer 
will ask you what you want to do and you 
tell it, using not more than two words. 

It is a good idea to pick up anything on 
the way that looks valuable or useful and 
to try using these things in any way you 
can think of to solve the problems you 
encounter. Type SCORE to find out how 
many points you have and if you have 


won. 




What is an adventure game? 


An adventure game is like a story in which 
the player is the hero. Unlike a book, where 
the sequence of events is fixed, an 
adventure game is different each time it is 
played because the player chooses what 
happens at each stage. By giving the 
computer instructions in response to 
descriptions which appear on the screen, 
the player goes on a dangerous journey into 
an unknown land. The aim is to survive 
whatever dangers may arise and return 
with treasures. 


The term “adventure” is now used to 
describe a wide range of different games. 
The game in this book is a traditional text 
adventure based on the Crowther & Woods 
type of game. The player takes the leading 
role in the story, but he is not given a set of 
attributes as in role-playing games. The 
player uses his own intelligence, cunning, 
and so on, not those of a character assigned 
to him at the beginning of the game. Like 
chess, traditional adventures are “mind” 
games, involving puzzle-solving rather than 
quick reactions or chance. 



Micro adventures 


There have been many adventures since 
this first one. Perhaps the most famous are 
those written by Scott Adams, an American 
programmer who was the first to produce a 
version of Adventure for a small micro. This 
was Adventure Land for the TRS-80. Other 
Scott Adams 1 adventures to look out for are: 
Pirate Adventure, The Count and Pyramid 
of Doom. 


The first adventure game was written in 
1976 on a mainframe computer at Stanford 
University in the U.S. A. by William 
Crowther and Don Woods. It is often 
referred to as Colossal Cave, Colossal or 
just Adventure, and a version of it is now 
available for most home computers. It was 
written in the scientific computer language, 
Fortran, which, unlike BASIC, cannot 
handle words. All the data for the game 
had to be indexed and stored on disc. 

The first people to play adventures were 
computer professionals, as home 
computers did not exist. A version of 
Crowther & Woods 1 adventure is still 
included with most large business 
computer systems to show people who are 
not used to computers that they can be 
“friendly”. These disc-based adventures 
often occupy more than 250K and are very 
complicated to play. 


Graphics adventures 


The original adventure did not use any 
graphics, relying instead on the player’s 
imagination to conjure up the monsters and 
other terrors that make up the game. Some 
people think that a game with graphics is 
not a true adventure, though there are some 
very good graphics adventures now 
available for micros. If you have sufficient 
memory, you could add graphics routines 
to your adventures or to the Haunted House 
program in this book. This book does not 
explain how to do this because 
graphics instructions vary so much 
from computer to computer. 
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What kind of program is it? 


An adventure program is really a kind of 
database. A database is a computer filing 
system which stores information and 
allows it to be called up in a variety of 
different ways, and it can have all kinds 
of serious uses. An adventure program is 
an “interactive” database. The player 
moves through it, altering or “updating” 
information as he does so. As you work 
through the book, you will see how 
particular words are used as “keys” to 
unlock certain items of information. This 
technique can be used to restrict access 
to certain information in a “serious” 
database. 

You can learn some useful 
programming techniques by writing an 
adventure. As the program is such a 
complicated one, it shows how important 
it is to plan it in detail before switching on 
your computer. It also makes you think of 
all the things a person using the program 
might try to do. If you work out a way of 
making the computer deal with any 
input, however silly, you will be able to 
write programs which don’t crash. 

Many of the adventures you can buy 
on cassette are written, at least partly, in 
machine code. This allows more 
information to be packed into the 
computer and makes the game run 
faster. If you know a bit about machine 
code, you could experiment with adding 
machine code routines to your 
adventures. 
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PLANNINGAGAME 


Whereto start 


When you write an adventure game you are 
inventing a fantasy world where you make 
up all the rules. You decide where it is, what 
sort of creatures and things live there and 
what these creatures and things can and 
cannot do. Your world can be an alien city, 
r , for instance, or an underground palace 




where elves, wizards and trolls live or a 
mysterious castle which is the home of 
dragons and other strange monsters. It 
could even be a time in the past involving 
actual historical people and facts. 

Many adventures use magic of some 
kind. You can decide how closely your 
world sticks to the rules of the real world 
and how much magic is allowed. Whatever 
you choose to do, try to make sure the rules 
are logical or players will find the game silly 
and frustrating. 

Having decided on a theme for your 
adventure world, you then need to decide 
on the point of your game. The player might 
have to escape, or return to a certain place, 
with treasures, or he might have to rescue 
someone, or find a secret place and do 
something there (such as defusing the Mad 
Scientist’s Evil Device for Blowing up the 
World). 


Working out the locations 


The areas or rooms through which the 
player moves during an adventure are 
called locations. Later in the book, you will 
see how these are numbered to put them in 
the computer. For the moment, you need to 
remember that the number of locations you 
can have depends on the amount of 
memory your computer has. More locations 
can make the game more interesting, but 
leave you less memory space for 
descriptions of them all. The game in this 


book has 64 locations with short 
descriptions. 

A location can be indoors or out and 
could be a room, a cave, half way along a 
passage, an area of forest, the middle of a 
field, or anywhere else you like. It is best to 
decide on the number of locations early on 
and stick to it, as this affects the whole 
structure of the game. 


Making a map 


The next stage is to draw a rough sketch 
map of your world. It need not be accurate - 

to the last detail but should show the overall 
scale. While you are doing this, think of 
some ideas for good hiding places for 
treasures and other objects that the 
adventurer will need. 

Here is a rough sketch map for the 
Haunted House adventure written for this 
pok. 
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Haunted House is set in a weird house 
standing on the edge of a sheer cliff. Its 
strange twisted turrets loom out of an 
always gloomy sky. No wall seems straight, 
no corner a right-angle. Not surprisingly no 
one lives there - well no human that is . . . 

People say the richest man in the world 
spent his last days there. Strangely, no one 
ever saw his body . . . 


Ideasforthemes 


If you’re stuck for an idea for your 
adventure game, think of films or TV 
programmes you have seen or books 
you have read. Remember, though, if you 
are writing a game to sell, you must not 
stick too closely to the plot or use the 
same names for copyright reasons. 

Here are some ideas for adventure 
themes. 




DETECTIVE STORY - the player is a 
detective investigating a terrible crime. 
The object of the game is to get back to 
police headquarters with all the 
evidence. (The items of evidence are the 
“treasures”.) 


’ Turret 
room 


PREHISTORIC ADVENTURE - the 
player has travelled through time to the 
days of cavemen. The object is to return 
to the present with The Stone, an object 
of immense power. The adventurer has 
to make his own weapons and anything 
else he needs, just as the cavemen do. 
Prehistoric beasts and cave magic are 
among the obstacles. 


TEMPLE TERROR - the ancient ruins of a 
temple built by a mysterious, long-lost 
race are reputed to contain the secret of 
eternal life. Just hearing about the things 
that are said to have happened there 
makes your hair stand on end. The object 
is to escape with the secret. 


Magical 'Jji-gjfn 
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PLANNINGAGAME 


Drawing a grid 


The first stage in turning your adventure 
world into a computer game is to transfer 
your sketch map to a squared up grid. You 
need one square for each location, so for its 
64 locations, th e Haunted House game 
needs an 8 x 8 grid. 

This grid will become the master plan for 
your adventure, so make it as large and 
clear as possible. Eventually it will show all 
the locations and the ways in and out of 
them, and all the treasures and objects used V 
in the game. 

Number each location, starting in the top 
left-hand comer. Most computers start 
counting at zero, so use zero as your first 
location number. 


Working outthe routes 

Mark the exits from each location on your 
grid, like this. 

Notice that some locations on this grid 
have one-way routes, so the player cannot 
return the way he has come. Make sure 
there are reasons for these if you use them 
in your adventure, even if the reasons are 
magic. In Haunted House the front door 
slams and locks behind the player once he 
has entered, so he cannot go out again. The 
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You may want to change the position of 
walls and doorways when you work out the 
routes the player can take, so start by 
pencilling your map lightly onto the grid. 
Label each location with a short 
description, eg “dark cellar” or “dusty 
room” and then think about the ways in and 
out of each location. The usual way of 
marking these is to use points of the 
compass - north being towards the top of 
the page, south down, east to the right and 
west to the left. 

By including staircases, ladders or 
trapdoors in your descriptions, you can use 
up and down for some of your routes 
instead of compass points. This makes the 
game more interesting without the need for 
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marsh at locations 53 and 54 is also a one- 
way route, because the boat gets stuck. 

How many one-way routes can you think of? 

When you have settled on your routes, ink 
in the walls and staircases to fit in with them 
and make a chart, like the one on the right, 
listing the location number, its description 
(this need not be your final version) and 
its exits. You will find this helps enormously 
when you start writing the program. 
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To help you see how the information fits into 
the program, you could complete this chart 
using the map on pages 14-15 and check it 
against the listing on page 37. 

^ 11 v 

3D games 


4 W E ► ^ W 


It is possible to construct real 3D 
adventures which are set on several 
levels like the storeys of a house. To do 
this you need two or more interlocking 
grids. Such games need a lot of memory 
(48K is probably the minimum to make it 
worthwhile) and can get very 
complicated to write. 
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PLANNING A GAME 

Hiding the treasure 

Having mapped out your adventure world, 
you need to come back to thinking about 
what the player has to do in it. In many 
adventures, the player has to find valuable 
objects of some kind and take them 
somewhere. These could be “real” 
treasures, like gold and jewels, or they 
could be something like secret plans and 
documents, or items of evidence to help 
solve a crime. If the purpose of your game is 
to rescue someone, then count this as 
having one “treasure”. 



You can have general 
obstacles and traps in your 
game too; they don’t all have 
to be linked to a particular 
treasure. Haunted House 
has a marsh for instance. 


Adding "props” 

You need to decide what treasures to have 
and where to hide them. Hiding the 
treasures will probably involve including 
some “props” in your plan. These are 
pieces of furniture, carpets, items of 
clothing and so on which the player can 
open or examine, but which cannot be 
taken away from the location in which they 
are found. Haunted House has a coffin as 
one of its props. 


Some ideas to think about 

Can you think of some “treasures” to fit 
with these game settings? 

1. The headquarters of an international 
crime syndicate. 

2. A distant planet which is known to be 
more technologically advanced than 
Earth. 

3. A secret scientific research 
establishment. 

Now can you think of some good 
obstacles to getting them? 
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Setting problemsforthe player 

Next you must think about the problems the 
player will have to solve in order to find and 
carry away the treasures. The cleverer and 
more original the problems you invent for 
the player, the more interesting the game 
will be to play. The solutions to many of the 
problems will involve other objects which 
the player must find and then use in the right 
way. You will find out about “useful” objects 
over the page. 

Make a list of your valuable objects and 
number them, starting with 1 this time. (You 
will find out why on page 16.) List the 
objects in order of value as this will be 
useful later on for setting up the scoring 
system. This is the start of the list of words 
you want your computer to recognize. 

Make a note of the obstacles to getting 
each treasure too. You might have a 
monster guard, for example, or a mad axe- 
wielding troll. Treasures might be in locked 
drawers, or in safes. They may prove 
impossible to carry without a container of 
some kind which is hidden elsewhere. On 
the left are some puzzles you can think 
about. 




House 


treasure list- 

Loeat/on 

number 

Object 

painting 


Took of spells 

goblet 

scrolls 

coins 

statue 

candlestick 


38 

35 
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13 


18 

28 

42 




3. Book of magic 
spells 

Hidden in secret 
room behind false 
^ wall. 


2. Diamond ring 

Hidden in 
coffin. 


8. Gold candlestick 


1. Oil painting 

Guarded by 
magical barrier 
and locked 
door. 


4. Jewelled 
{ goblet && * ** 

L Guarded by paralysing 
spirits and locked 
door. 


5. Ancient scroll 

Guarded by bats 


6. Bag of gold corns 

You need a light. 


7. Ebony statue 

You need a light 


Mark your “treasures” on your master plan , y 
using the numbers assigned to them on your 
list. Then write the number of the location 
next to the object on your list too. (You can 
only have one object in each location.) 


Detective game puzzle 

In this game the valuable objects are: 

1. Single red hair 

2. Brown woollen thread 

3. Footprint 

4. Set of fingerprints 

5. Blood stain 

6. Heavy wooden stick 

The obstacles to getting these are: 

1 . The hair will get damaged or lost if you 
take it as it is. It is on the sleeve of a coat. 

2. The thread, invisible to the naked eye, is 
\side edge of a locked drawer. 


3. The footprint is in a flower bed outside a 
window. 

4. The fingerprints are on the surface of a 
large table next to the body. They are 
invisible. 

5. The blood stain is on the carpet. 

6. Touching the stick will destroy any prints 
which might be on it. 

What solutions can you think of? There are 
some suggestions on page 47, though yours 
might be better. 
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PLANNING AGAMh 

Useful objects . . . 

To help the player solve the problems you set, you will have to include some tools, 
weapons and other useful objects in the game. The player must find the appropriate 
objects and use them in the right way to get round the obstacles. You can test the 
player’s ingenuity by not including the most obvious objects. Instead of a key, for 
example, you could include a hairpin or paperclip for opening a locked door. You can 
make things more difficult, too, by hiding, say, a torch in one place and the batteries for it 
in another. The player must find both before he can use them. 

Add your objects to the word list you started for your treasures. Don’t forget that some 
of your treasures can have uses too. (You don’t need to list them twice.) 


Haunted House problems and solutions 

Here are the solutions to the Ha un ted House game problems 
and the objects needed for them. 




Problem 

Too dark to see 


Bats 

Secret room 
Locked door 
Paralysing ghosts 

Magical barrier 

Marsh 


Barred window 
Coffin 


Solution 

Put candle in candlestick 
Light candle with match 


Spray with “Baticide” 

Break down false wall 
Unlock 

Suck up with vacuum cleaner 

Use magic spell 

Get across in boat 
(Can only be used once as 
it gets stuck in mud) 

Dig round edge to remove bars 
Open lid 


Objects needed 

Candle (hidden in desk drawer) 
Matches 

Candlestick (already in 
valuable objects list) 

Aerosol can 

Axe 

Key 

Portable vacuum cleaner 
Batteries 

Book of magic spells (already 
in valuable objects list) 

Boat 


Shovel 

Nothing 


^Decide where the objects are to go and 
k them on your master plan. They will 
less conspicuous if you put them in 
laces where people would expect to find 
em, e.g. knife in the kitchen, book in the 
dy or library, axe near the woodpile. You 
ight want to add extra props (see previous 
page) at thisbtage. Haunted House has a 
desk in which the candle is hidden. 
Remember not to put your objects in 
impossible places. It is no good putting the 
light behind a locked door and then putting 
the key in a dark room. 

Put the number of the location next to 
each object. Add to your list any other 
words (not verbs) that you will want the 
computer to understand, too e.g. north, 
south, ghosts, bats, coffin. (Remember to 
include all your props.) 
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. . . and what can be done with them 


Now you have decided on the objects to go 
in your game, what are you going to let the 
player do with them? You need to make a 
list of verbs and the things they apply to. 
This should include “going” verbs too, so 
that players can give instructions about 
where they want to move to. 

Many adventure programs are 
constructed so that the computer accepts 
commands of not more than two words from 
the player. It checks the first word against a 
list of verbs you have put in its memory and 
the second against the object and direction 
words you have given it. A lot of the fun in 
writing adventures is trying to think of all 


the combinations of verbs and objects that 
the player might try and deciding on what 
action or reply the computer should give. 
Writers of business programs need to think 
in this way too, to prevent their programs 
crashing because of an unexpected 
response from the user. 

To deal with verbs (and objects) which 
the computer cannot find in its memory, 
you can include general replies, such as 
“Do what with the (object)?”. Group 
together verbs which mean the same 
thing, such as get and take. You will be 
able to save memory space by sending 
the computer to the same routine for both. 



Haunted Houseve rb list 


Number your verbs starting with 1 . (The 
computer uses zero for “verb not found”, 
as you will see on page 16.) HELP and 
INVENTORY (or CARRYING?) are 
standard adventure game features so 
include them in the verb list. It is also 


useful to add shortened forms of GO 
NORTH etc. (see verb numbers 4-9 in the 
chart). These reduce the amount of 
typing the player has to do and make the 
game faster to play. 


Verb 

number Verb 


Applies to 


I 


0 





1 

HELP 

— 

2 

CARRYING? 

— 

3 

GO 

DIRECTIONS 

4 

N 

— 

5 

S 

— 

6 

w 



7 

E 

— 

8 

U 

— 

9 

D 


10 

GET 

OBJECTS 

11 

TAKE 

OBJECTS 

12 

EXAMINE 

ANYTHING 

13 

OPEN 

DOOR, DESK 

14 

READ 

BOOKS, SPELL 

15 

SAY 

ANY WORDS 

16 

DIG 

— 

17 

SWING 

AXE 

18 

CLIMB 

ROPE 

19 

LIGHT 

CANDLE 

20 

UNLIGHT 

CANDLE 

21 

SPRAY 

AEROSOL 

22 

USE 

VACUUM 

23 

UNLOCK 

KEY, DOOR 

24 

LEAVE 

ANY WORDS 

25 

SCORE 

— 


Action (conditions, if any, in brackets) 

Used to indicate “verb not found” 

Lists all verbs the com 
Lists all the objects 
Moves position 



lviuvtrb pUbiliUIl 

Shortened form for “GO NORTH” 
Shortened form for “GO SOUTH” 
Shortened form for “GO WEST” 
Shortened form for “GO EAST” 
Shortened form for “GO UP” 
Shortened form for “GO DOWN” 
Pick up object and take it with you 
(Object must be in the location) 
Same as GET 


Reveals any concealed object 


Opens door or drawer (must have key for door) 
Displays written clues (must have book of spells 
or be in library) 

Says words typed “out loud”, e.g. casts spell 
Makes a hole (must have shovel and be in cellar) 
Breaks down false wall (must have axe and be 
in study) 

Go up or down rope 

Turns light on (must have candle, matches and 
candlestick) 

Turns light off (must be carrying lighted candle) 
Removes bats from rear tower (must have 
aerosol) 

Sucks up ghosts (must have vacuum and 
batteries) 

Opens door (must have key) 

Leave object behind (must have object) 

Prints out score 



\ 
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PLANNINGAGAME 

The master plan 

Your master plan and the lists you have 
made contain all the information, or data, 
needed for your program. Here is the 
completed master plan for Haunted 
House. (Don’t worry if your master plan 
doesn’t look as elaborate as this.) Over the 
page, you will find out how to put this data 
in your computer. Before you touch your 
computer, though, make sure you have 
planned out your game to the last detail. 


Adventure brain teasers 

Here are some situations players might 
perhaps find themselves in during an 
adventure. See how many solutions you 
can think of for each one. There are 
some suggestions on page 47. 

1. You are trapped in a room about 
three metres square. There are no 
doors. There is a thick carpet. 

2. As you enter a room, a feeling of 
extreme drowsiness comes over you. 
You are carrying a small, but quite 
heavy, rucksack and a handkerchief. 

3. You are standing on the battlements 
of a castle. Beneath you is a horde of 
angry slaves and behind you armed 
soldiers. You have a parchment scroll 
in your hand. 

4. You have been invited to dinner by 
the evil arch-villain. He has taken away 
all your weapons. As dessert is served, 
he shows you the remote control for his 
world decimator weapon. 


DARK 

CORNER 


OVERGROWN 

GARDEN 
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Can you think of 
some more 
adventure brain 
teasers (and 
solutions for them 
of course)? 


CORNER OF 
HOUSE 






BLASTED 

TREE 


Rubbish 


THICK 

FOREST 


Shovel 

WEEDPATCH 


FOREST 


YARD 


I Scroll 

^ Bats 
REAR 
TURRET 
ROOM 


SCULLER' 

DOOR 


DUSTY 

ROOM 


CLEARING 


WIDE 

PASSAGE 


SLIPPERY 22 
STEPS 


◄ w 1 

E ► 

SMALL; 

DARK 


CLIFFTOP 


^ W Down 

SPIRAL 

STAIRCASE 


S Down 


ROOM 


'◄w 

Statue TROPHY 

£► ◄w ROOM 


VAULTED 

HALL 


CELLAR 


CLIFF 

PATH 


HALL WITH 
|w LOCKEDOOOR 


▼NDown 

STEEP 

MARBLE 

STAIRS 


CLIFF 

PATH 


DINING 

ROOM 


SPOOKY 

ROOM 

Painting/ 


STUDY 
Candle/ 
in / 
drawer/ f 


CLIFF 

PATH 

BY 

MARSi 


COBWEBBY 

ROOM 

ONE WAY- 


COLD 

CHAMBER 


SLOPING 

CORRIDOR 


UPPER 

GALLERY 

Paralysing 

ghosts 


MARSH 
BY WALL 


SOGGY 

PATH 


MARSH 


59 DEBRIS 60 

Aerosol can 

BENEATH A _ 

tower 


FALLEN 

BRICKWORK 


CRUMBLING 

CLIFFTOP 


STONE 

ARCH 


SECRET 35| 

ROOM 

Book 

3 


of 



spells 



s 
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The $ sign indicates that this is 
a string array, that is, one for 
storing letters and words. 


This array is set up in the 
program by writing 
DIM D$(63). 


STORING THE DATA 


Putting the data into the computer 


You now have all the data for your 
adventure written out on pieces of paper. 
The next problem is to work out how to put 
it into the computer’s memory. 

The computer needs the data stored in 
such a way that it can get at each item 
quickly and update things as the player 
progresses through the game. To do this, 
you set up storage areas called “arrays” in 
the computer’s memory. An array is like a 
set of pigeon holes or filing boxes. You 
give each array a name and each box in it a 
number, so the computer can find the box 
you want when you refer to it in your 
program. 


This is an 
array called "X" 


2. An array to hold the information about the 
routes the player can take from one location 
to another. This is R$( ). It needs to be the 
same size and numbered in the same way as 
D$( ). 


3. An array for the objects and other words 
on the word list. By dimensioning this DIM 
0$(W), where W is the number of words on 
your list, the computer will set up an array 
with one space for each word and an extra 
space. This is because it always starts 
numbering with zero and ends with the 
number in the DIM statement. This is useful, 
because the zero space can be used for 
“word not found in memory”. 

e.g. If W=4, the array would look like this. 
DIM 0$(4) gives five spaces labelled 0 
to 4. 


Before you can give the computer any 
data, you must decide how big each array 
should be and tell the computer to reserve 
and label that much space. This is called 
“dimensioning” the array and is written 
DIM in BASIC. 

The arrays for Haunted House 

Haunted House needs the following arrays 
to hold its data. You will need similar arrays 
whatever the theme of your adventure. 

1 . An array to hold the descriptions of the 
locations. It needs 64 pigeon holes (one for 
each location). We’ve called it D$( ) and 
numbered the holes 0 to 63 as on the master 
16 plan. 



Using variable names, 
such as W and V, makes 
it easier to change the 
number of words and 
verbs at a later stag 



4. A verb array. This needs a space for each 
verb and an extra space for “verb not 
found”. It is called V$( ) and needs to be 
dimensioned DIM V$( V) where V is the 
number of verbs on your list. 

More arrays 

Locations, routes, object words and verbs 
are not the only information that needs to be 
stored in the computer. You also need 
arrays to store information about where the 
objects are, which objects the player is 
carrying and such things as whether the 
light is on or off. 

There is no need to store the object and 
location words again. This extra information 
can be stored as numbers to save space, 
e.g. object 9 is in location 10. 

Array L( ) shows which location each 
object is in. It only needs spaces for the 
“gettable” objects such as the key, not the 
props or other words. If G is the number of 
gettable objects then this array is 
dimensioned DIM L(G). 

Array C( ) is for information about which 
objects the player is carrying. This also 
needs spaces only for the gettable objects, 
so is dimensioned DIM C(G). 



Flags 

As well as keeping track of the things the 
player is carrying, the computer needs to 
be able to record other changes that 
happen during the game, e.g. whether the 
candle is alight, the door locked or the key 
visible. 

This can be done by using an array, F( ), 
of markers or “flags”, which contains W 
spaces, i.e. one for each object word. By 
putting Is and Os in these spaces, the 


computer can see what state the object is in. 
0 is used for the “normal” or “inactive” state, 



such as light off, object visible. 1 shows the 
“active” or “not normal” state, such as light 
on and object invisible. 



Why not use 2D arrays? 


/^Didyou know that computers^ 
have flag registers in their 
CPUs which work like this flag 
array? They use them to store 
information about what is 
happening while a program is 
running. 


If you have come across arrays before, 
you may have wondered why single 
dimension arrays are used for the 
Haunted House descriptions and routes 
instead of two-dimensional arrays, 
which would look like this: 



v 


The reason is that single dimension 
arrays use slightly less memory space. 
You could use 2D arrays if you wanted to, 
in which case you would dimension them 
DIM D$(8,8) and DIM R$(8,8). 


STORING THE DATA 

Putting the data into the arrays 

Having set up labelled storage areas in the 
computer’s memory, you need to tell it what 
to put in them. One way of doing this is to list 
the data, in order, and tell the computer to 
loop round putting one item at a time in the 
spaces in an array. * Here is how this is 
written in BASIC: 


Data fortheflags 

The data for the flag array, F( ), consists 
only of Is and zeros. Objects which are 
invisible at the start of the game have 1 in 
their box in F( ). When they are discovered 
by the player the flag changes to zero. All 
the other objects start with zero. 




DIM 0$(W) 

DATA PAINTING, RING, MAGIC SPELLS, GOBLET, ETC. 
FOR 1=1 TO W 
READ OKI) 

NEXT I 



First time round, 1= 1, so 
PAINTING is put in 
0$( 1). Computer goes 
back for the next value of 
I and puts the next item, 
RING, in 0$(2) and so on. 


Loop starts with 1 for 
object, verb and the 
three number arrays, so 
computer leaves space 
zero empty. For location 
and route arrays, loop 
starts at zero. 



pr 



1 0 


( 1 2 ■ jgy> 

L. 











Commas separate 
items of data. 


18 


This is the loop for RE ADing the DATA into 
0$( ). Look at lines 1600 to 2 100 in the 
program listing on pages 36 and 37 and see 
if you can pick out the data loops for the 
other arrays. 



Y ou only need to tell the computer which 
boxes in F( ) need Is in them. Leaving the 
rest empty is the same as filling them with 
zeros. The easiest way to fill this array is as 
shown in line 2090 (on page 37). 

You may have noticed that some spaces 
in F( ) are not used because some objects 
do not change their “state”. These spare 
flags can be used for other things. For 
instance, in Haunted House, F(14) (the rope 
flag) is used to show whether the player is 
up the tree. The candle needs two flags - 
one to show if it is visible and another to 
show if it is lit. The spare flag F(0) is used for 
lighting it. If you want a spare flag for 
something, use the ones for words that 
won’t need them, like “north”. 

Data for the carrying array 

The player isn’t carrying anything at the 
beginning of the game, so to show this the 
array C( ) is left empty. When an object is 
picked up the computer puts a 1 into its box. 
So, no data lines are needed for array C( ). 

Initialization 


Setting up the arrays and filling them with 
data is called “initialization”. You can see 
in the next section where this fits into the 
program structure. 


TheZX81 (Timex 1000) does not do this , see page 39. 





WRITINGTHE PROGRAM 


The program structure 


In order to arrive at the overall structure of 
the adventure program, you need to think 
about the jobs the computer has to do 
during the game. 


Z ' exits -(DESCRIF^ 1 ^ oroddlt i ona l 

3 p r i n t any message from instructions 

information 9 K) 

A TJ^'^*****^ 

5 KV *3SSr SWfSKS 
Wrfwordsan Iverbs^l ^ sense , rhe n 

6a If instructions d° ^ ^ for further 

prompt the pl y Q(? mE s5A6ES) 

(BRANCH smoU J^ E 1 ) ake action as 

7 Use subroutines 
instructed. 

8 GobacKto l 


The structure of the program actually looks 
like this. As you can see, the biggest part of 
it is the subroutine section. There needs to 
be one subroutine for each verb used in the 
game. You will find out more about these on 
page 25. 


The list above shows the order in which the 
computer needs to do things, but not 
necessarily the order in which they need 
appear in the program. A large chunk of the 
program is the initialization routine which is 
only needed once each game, and, 
although it is the first thing the computer 
must do, it is a good idea to put it at the end 
of the program. This is because every time 
the computer is told to GOTO or GOSUB it 
goes back to the beginning of the program 
and checks through each line number until 
it finds the one it wants. This can take a 
noticeable amount of time in a long 
program. By putting initialization at the end, 
the computer does not have to check 
through it each time the player makes a 
move. 






WRITING THE PROGRAM 


Getting into the program 


Now you have an overall idea of what the program will be like, you can start thinking about 
each part in more detail. You have already seen on pages 16 to 18 how the initialization 
section works. The next eight pages describe how the other main parts of the program 
work. 


Description and feedback 


Every go, the computer must tell the player where he is and the directions in which he can 
move. It must also tell the player what happened as a result of his last instructions. This is 
the description and feedback section and it looks something like this. See if you can 
identify each part in the program listing on pages 35 to 37. 


90 PRINT "TITLE OF GAME 0 

100 PRINT H H 

110 PRINT "YOUR LOCATION: 1 
120 PRINT D$(RM) 



RM is the number of the location the player 
is in. You must remember to set a starting 
value for this in the initialization routine. (For 
Haunted House 57 is the starting value for 
RM. see line 2090). 


The computer looks in D$ (the array 
containing all the descriptions) and prints 
what it finds in the box with the value RM. 


130 PRINT "EXITS: 

140 FOR 1=1 TO LEN (RS (RM) ) 

150 PRINT HID$(R$(RH),I,1); Vi 
160 NEXT I 



Looks at the length of the string in box RM in 
the routes array, R$ The computer then 
loops round this number of times, printing 
out each character in R$(RM) in turn, 
putting a comma and a space between each 
one. 


"NWS" -so 
LENR$(57)is3. 


180 FOR n TO 0 

o 190 !F L!1)=RN AND F i I ! =0 THEN PRINT 
"I SEE ” ; Q$ ( I ! j " HERE” 
o 200 NEXT' I — 

220 PRINT Ml 

o o 


Loops round to see if there is an object with 
a zero flag in the location (i.e. a visible 
object) and prints out its name if there is. 


M$ is a variable used to contain messages 
'the computer has for the player, as a result 
of instructions given in the previous go. 

Look for M$ in the program listing on pages 
33 to 37 and see how different messages are 
put into M$ depending on what the player 
typed. 


225 N$=“WHAP’ 


Urgent Y. 
message for 0 ° 
player from 
Subroutines. 


At the beginning of each go, M$ is set to 
"WHAT?", so if there is no new message to 
replace this, the computer just prints 
“WHAT 9 " 



Right -I'll take 
"WHAT?" out. 


The input section 


An important feature of adventure games is the way the computer responds to instructions 
typed into it by the player. Haunted House, like many adventures, limits the player to 
two- word sentences, plus a few special one- word commands such as HELP. The next 
section of your program must ask the player for instructions and then tell the computer 
what to do with them. 

To start with the computer needs to split the player’s input into two words which it can 
then check against the words it has in its memory. The “word-splitter” routine used in 
Haunted House works by scanning the player’s input until it finds a gap in the letters. It is 
listed below with a few extra lines so you can type it in by itself and see it working. * 


100 CLS 

110 PRINT “PLEASE TYPE SOMETHING” 
120 INPUT Q$ 

130 V$= HB 

140 W$="" 


150 FOR 1=1 TO LEN(Qi) 


160 IF t1ID$(GU,l)= B " AND y$= 
un THEN y$=LEFT$(Q$,I-l) 


I've found 
a space ! 



Gets player’s instruction and puts 
, it in 0$. Sets up two new string 
variables: V$ and W$. 

Looks to see how many 
characters there are in 0$ and 
• starts a loop which goes round this 
many times. 

, Looks through Q$ for a space. If it 
finds one and V$ is still empty, it 
, puts all the letters to the left of the 
space into V$. 




O © \j 

These line numbers 

Cr <_ 

do not correspond 


to numbers in main 


^ program listing. 

\s 



170 IF MID$(Q$, 1+1, 1)0“ " AND ViO"" THEN W$=MID$ 
(Q$,I+1,LEN(Q$)-1) ; I=LEN (0$), 



180 NEXT I 
190 IF W$="" THEN V$=Q$ 


i 


200 M$="THESE ARE YOUR 2 WORDS" 

210 PRINT "FIRST «0RD=";V$ 

220 PRINT "SECOND W0RD=";W$ 

230 IF W$="" THEN M$="Y0U ONLY TYPED ONE WORD" 
240 IF W$=“" AND V$="" THEN M*="YQU DIDN’T TYPE 
ANYTHING" 

250 PRINT MS 
260 STOP 


Continues to look through 0$ until 
it finds a letter following a space. 

It then takes everything to the 
right of this space and puts it in 
W$. (This means it doesn't matter 
how many spaces the player 
types between his two words.) 

When V$ and W$ are both filled, 
the loop counter is set to its 
" maximum value to end the loop. 

. If the computer didn't find a gap in 
the letters then V$ and W$ will 
still be empty when the loop has 
finished. It then takes the whole of 
0$ and puts it in V$. 

This section is so you can run the 
word-splitter by itself. It prints out 
" messages depending on what 
you typed in. Run the program 
and see what happens. 


NB This will not work on Sinclair (Timex) computers. Seepages 38 or39. 



WRITING THE PROGRAM 

Analysis of input 


The computer now has the player’s instructions stored in two strings V$ and W$, which 
stand for “verb string” and “word string”. Its next job is to check these against the words 
you have given it in the initialization procedure on page 18. It assumes the word in V$ is a 
verb and loops round seeing if it matches any of the verbs in the array V$( ). (Note the 
difference between the string variable V$ and the array V$( ) - they are completely 
different things to the computer, so make sure you don’t confuse them.) 

The computer then loops round in the same way trying to match up W$ with one of the 
words in the array 0$( ). 

Here is the section of program which checks for a match between the player’s words 
and the words in the computer’s memory. 




VB is a new variable set up to record the 
box number containing the matching verb. 
If the player typed GET, for example, the 
computer looks through V$( ) until it 
reaches box 10 where GET is stored. So, in 
this case, VB=10. 


v$( ) 


I've found 
it - it's 
in 10. 


20 FOR 1=1 TO V 

30 IF y$=V$(l) THEN VB=I 

40 NEXT I 


The computer loops round V times (V is the 
number of verbs in the computer's 
memory), comparing the player's verb with 
each of those in its memory. If it finds one 
that matches, it sets VB to the appropriate 
number. 


50 0B=0 

60 FOR 1=1 TO H 

70 IF W$=0$(I) THEN 0B=! 

80 NEXT I 


The loop for W$ works in the same way, 
using OB to record the box number of the 
matching word. 



What if the words don't match? 

If no match was found, then VB and OB will 
still be zero. The computer takes this as 
meaning that box zero in the array contains 
the match for the player’s word. But when it 
looks there to find out what the matching 
word is it doesn’t find anything because you 
left this box empty when filling the arrays 
with data. 


Silly combinations 

Notice that this matching-up process only 
checks if the two words are in the 
computer’s memory. It doesn’t check to see 
if the combination of words makes sense. A 
silly combination such as UNLOCK 
CANDLE gets through this stage of the 
jrogram, but will be rejected later on when 
computer tries to carry out the action. It 
much quicker just to check the separate 
at this stage than to tell the computer 
to check for valid combinations. 

At the end of this section of the program, 
the computer has a value for VB and a value 
for OB. You can see what it does with these 
over the next page. 




Setting up error messages 


The computer can use the values of VB and 
OB to see if the player needs to be sent a 
message saying his instructions are no 
good. This part of the program is like a filter 
or grader. The player’s instructions are fed 
through a series of tests. If they don’t pass 
one of the tests, a new message is put in M$. 
If they pass through all the tests, M$ still 
contains the message “WHAT?” which was 
set up in line 220. (Remember that, at this 
stage, the messages are just set up, they are 
not printed on the screen and may be 
changed again later in the program 
anyway.) 

Here are the program lines which set up 
the error messages in Haun ted House - see 
if you can find them in the main listing. You 
will need similar lines if you are writing your 



object to the zero and produce an “on 
range” error. To get round this, VB is 
changed from zero to a value greater than V 
(the number of verbs in the computer’s 
memory), and the computer is sent to a 
“dummy” subroutine. 

— ~ * 

0 IF «*=■“ THEN P1$=”I NEED TWO WORDS" ° 


o © 

^ — a 



This line sets up a message if the player 
only typed one word and so W$ is empty. (If 
the word is one of the allowed one- word 
commands, this message will be changed 
later in the program.) 



The first test looks to see if there is a word in 
W$ (i.e. that the player typed two words) 
and then checks if the value for OB is zero. 



This line is to overcome a problem. You 
cannot GOSUB on a value of zero. But 
different BASICs vary in the way they cope 
with being asked to do this. Most of them 
ignore the GOSUB and carry on to the next 
line. Some, however, such as the BBC, 


This line sets up a message if the computer 
doesn’t have the verb in its memory, but 
does have the object. 


fipF 


IF VB>V AND 0B=0 THEN W$=*VQU DON'T 
MAKE SENSE" 



If the computer doesn’t have either of the 
player’s words in its memory it sets up this 
message. 


WRITING THE PROGRAM 


IF VB< V AND GB/0 AND C(0B)<>1 THEN 
° “YOU DON’T HAVE ,, 0$(0B) 



Override conditions 

Sometimes things happen in an adventure 
which prevent the player from doing 
anything until he has dealt with them. In 
these circumstances, instructions which 
would normally be valid need to be 
overridden, so the computer needs 
program lines which set flags* in its 
memory to tell it that special conditions 
apply. 

In Haunted House, lines 420 to 450 are 
override conditions. You can see them on 
the right, with an explanation of how they 
work. 



Stop work ' 
everyone - 

P>rrfc ntfnrkinn 


420 IF F (26) =1 AND RH=I3 AND RND(3H>f 
AND VB<>21 THEN H*="BATS ATTACKING!": 0 
GOTO 90 o 

430 IF RM=44 AND RND!2)=1 AND F!24)<>1 
THEN F!27!=l ° 

440 IF F(0)=1 THEN LL=LL-1 
450 IF LL< 1 THEN Ft0)=0 ° 


Line 420 

If bats are present, player is in Rear Turret 
Room, random number is not 3 and player 
hasn't used verb 2 1 (SPRAY) in his 
instructions, then M$ is set to "BATS 
ATTACKING" and player cannot go any 
further in the game. 

Line 430 

If player is in Cobwebby Room, random 
number value is 1 and vacuum cleaner is 
switched off, then flag is set for paralysing 
ghosts to appear, i.e. F(27) is set to 1. 

Line 440 

If candle is lit, then light limit counter, LL, is 
decreased. 

Line 450 

If LL is zero, then candle on/off flag, F(0), is 
set to zero. 


Perhaps you can think of other override 
conditions which could be added here. 


Branch to subroutines 

The computer’s next task is to attempt to 
carry out what the player wants to do. If it 
had to search through every possible action 
until it found the one the player wanted each 
time, the game would be very slow and 
boring. To avoid this, you use lots of 
subroutines - one for almost every verb on 
the verb list. (A few, such as GET and TAKE, 
can share the same one.) 

You can then use an ON . . . GOSUB line to 
tell the computer to branch to a different 
subroutine depending on the value of VB. 



Seepage 18 for more about flags. 


HowtheON. . . GOSUB line works 


The ON . . . GOSUB line on the opposite page works like this. If VB= 1 the computer goes to 
the first line number listed, if VB=2 it goes to the second, if VB=3 it goes to the third and so 
on. Notice that the last line number listed is a “dummy” subroutine for VB=V+ 1 (the value 
of VB when no matching verb was found in the computer’s memory). The line it is sent to 
just says RETURN and so sends the computer straight back up the program again. 

Look at the subroutines on pages 34 to 36 and see if you can work out what they all do. 
Here is the procedure for LIGHT (VB= 19) as an example. You will find it at lines 1340- 1370. 


1. If the object 
word in player’s 
instructions is 
“candle”. 



^IF_0B=17 AND^(17)=1 AND C(8)=0 
>?lX)^rHEN M$= "IT WILL BURN YOUR HANDS" 


at n 

A 


/ O ^o [I 5. If object is 

V 4. . . . then this message 

x ^ t v. J candle and 

is put in M$. 

V player is 


\ carrying it .. . J 



2 AND player is 

carrying candle . . . 



3. . . . AND player is not 
carrying object 8 
(candlestick) . . . 


IF OB= 1 7 AND C ( 17) =1 AND C(9)=0 
THEN M*=" NOTHING TO LIGHT IT WITH" 

■ VX 

8. If object is 
candle and 
player is 
carrying it . . . 



6. . . . AND 
player is not 
carrying object 9 
(matches) . . . 





9. . . . AND 
player is 


carrying 

candlest 

matches 


candlestick AND 


j 


IF OB= 1 7 AND ^(17^=1 AND C(9)=l AND C<8)=*1 
THEN M$=" IT CASTS A FLICKERING L IGHT" : F (O) =1 


11.... and candle on/off 
flag is changed to 1 to 
show it is lit. 


What happens if the object is not candle? Back to the main program 




If the object the player wanted to use was 
not CANDLE, but one of the others in the 
computer’s memory, such as DOOR, then 
the message in M$ is unchanged from when 
it was set up in line 220. When the computer 
returns to the main program and finds the 
instruction PRINT M$ it will print the 
message “WHAT?”. 

Notice that there is no need to set up a 
message saying the candle isn’t there, as 
this is already covered in the error 
messages section. 


Although some of the verb routines are 
longer and more complicated than this one, 
they all work in a similar way: the value of 
OB is checked, a special message is set up 
if necessary and then the computer returns 
to the main program. It checks the light limit 
at lines 470 and 480 and is then sent back to 
the description and feedback section. Here 
it prints out the message it has put in M$ and 
waits for the next set of instructions from the 
player. 
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WRITING THE PROGRAM 

The GO subroutine 


The subroutine for the verb GO is so large 
and important in an adventure game you 
could almost think of it as a sub-program. 
Seven verb commands are directed to it- 
GO, N, S, W, E, U and D. This routine is also 
special because it responds to single-letter 
direction commands as well as two- word 
ones. You don’t have to include this facility 
in your program, but it does help make the 
game quicker and more interesting to play. 
If you’ve played many adventures you will 
realize how tedious it is to have to type GO 
NORTH etc. every time. 

This is how the GO routine works. 



Line 640 


4 ?- 

D - 1 - north i 
D = 2 = south 
0^3 = west 
D -4 = east 
D - 5 - up 
D = 6 = down 

i 

\ 


640 D=0 

650 IF 0B=0 THEN D=VB-3 
660 IF 0B=19 THEN D=1 

670 IF QB=20 THEN D=2 

680 IF 0B=21 THEN D=3 

6 % IF 0B=22 THEN C=4 

700 IF 0B=23 THEN D=5 

710 IF 08=24 THEN 0=6 

720 IF RH=20 AND D=5 THEN D=1 

730 IF RM=20 AND D=6 THEN 0=3 

740 IF RN=22 AND D=6 THEN D=2 

750 IF RH=22 AND D=5 THEN 0=3 

760 IF RH=36 AND D=6 THEN D=1 

770 IF RH=36 AND D=5 THEN D=2 

780 IF F ( 14)=1 THEN M$="CRASH 
: F i 1 4 > =0: RETURN 



You can see now why 
directions were 
included on both the 
verb and the object 
lists. 


YOU FELL OUT OF THE TREE'" 


790 IF F (27) =1 AND RH=52 THEN N$="GH0STS WILL NOT LET YOU 
HOVE": RETURN 

800 IF RM=45 AND C(l)=l AND F<34)=0 THEN Hi= M A MAGICAL 
BARRIER TO THE WEST" : RETURN 

810 IF (RM=26 AND F «0)=0« AND <D=1 OR D=4» THEN H«=*YQU 
NEED A LIGHT" : RETURN 


820 IF RN=54 AND CU5> '1 THEN M*="Y0U f RE STUCK ,e : RETURN 
830 IF C(15)=l AND NOT <RN=53 OR RM=54 OR RM=55 OR RN=4?i 
THEN M$=*Y0U CAN’T CARRY A BOA 


840 IF iRM >26 AND RM 30» AND F(0)=0 THEN M$= ,! T00 DARK TO 
MOVE”: RE TURN 



Line 650 


First, a variable D is set up to hold 
information about the direction in which the 
player wants to move. Its values 1 to 6 
correspond to north, south, west, east, up 
and down. 


The next line checks to see if the player just 
typed one word and then gives D a value 
depending on the value of VB. (Notice that 
by taking 3 away from VB, the computer 
gets values for D which correspond to those 
in lines 660 to 710.) 




Lines 720-770 


The next six lines check if the player typed 
a two-word direction instruction. They use 
the value of OB to set the value of D. 
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As this is not really a 3D adventure, the UP 
and DOWN instructions need to be 
converted into north, south, east or west. 
Lines 720 to 770 do this. (If you check back 
to the master plan on pages 14 to 15, you will 
see that this does work.) 



Lines 780-840 


F(14)-1,so 
he's up the 

■Free I 



The computer also needs to check if there 
are any special conditions which affect the 
player’s ability to move. For example if 
F( 14)= 1, then the player is at the top of the 
tree. If he tries to move without first 
climbing down, he gets a message saying 
he has fallen. 

Checking for walls 

If the move has not been stopped 
by any of these special 
conditions, the computer must 
check that there isn’t a wall or 
anything else blocking the way. 

Here are the lines which do this. 

They look quite complicated at 
nr st sight, but if you look carefully 
a: each part, remembering what 
ail the variables are, you should 
oe able to see what is happening. 

850 F (35)=0:RL=LEN(R$(RM) ) 

860 FOR 1=1 TO RL 

370 U$=HID$<R$(RM,I,1> m m 

380 IF <U$="N" AND D=1 AND F(35)=0:’ 

THEN RH=RN-8:F(35)=1 


If the player is in location 52 and the ghost 
flag is “on” then a message is sent to say he 
cannot move. Each of these conditions 
returns the computer to the main program. 
See if you can work out what the rest of the 
lines in this section do. 




This is a flag for the computer to use to register 
whether it has found the exit the player wants. 

RL is a new variable which holds the length of the 
string which it finds in R$(RM). (This string is the 
routes, NSW etc., for the location the player ism.) 


• Computer loops round RL times. 

• Each loop, computer takes one of the characters in 
R$(RM) and temporarily calls it U$. 

It then runs a series of tests on U$ and D. If the 
player's direction instruction matches an exit in the 
location he is in, then the value of RM is changed to 
move him to the appropriate place. F(35) is then set 
to 1 to stop the computer trying to change RM again 
on another trip through the loop. (If you think 

• carefully, you will see that this could be possible as 
the computer uses its new value of RM in line 870.) 

If you check the master plan, you will see how 
adding or subtracting 1 or 8 moves the player to the 
correct next location. 


890 IF 


AND D=2 AND F(35)=0: 


5)=0: r 

If 


THEN RH=ftM+8 : F <35) =1 
900 IF !U$="N" AND D=3 AND F(35)=0: 
THEN RH=RH-1:F(35!=1 
910 IF IU$="E" AND D=4 AND F (35)= 
THEN RH=RM+1:F!35) S 1 
920 NEXT I 

930 Ht r "0K 11 

940 IF F (35) =0 THEN M$="CAN’ 

THAT NAY* 

950 IF D<1 THEN «$=“G0 WHERE? 

960 IF RH=41 AND F!23)=l 

THEN Rt!49)="SN“:N$-"THE DOOR 
SLAMS SHUT ! * : F (23) =0 
970 RETURN 


160 Jr 

J 

h 


At the end of the loop, M$ is set to "OK”. This will 
replace the "I NEED TWO WORDS” message set 
in the error messages if the player typed a one- 
word direction. 

If F(35) is still zero, then the direction the player 
wants to go is not allowed and M$ is changed to say so 

If D is less than one (i.e. it wasn’t assigned a value in 
lines 650 to 770), then M$ is changed to "GO WHERE 9 

This line makes the front door a "once-only" route. 
When the player enters location 4 1 (the lobby), the 
exits from location 49 (front porch) are changed 
from “NSW” to "SW”, M$ is set to "THE DOOR 
SLAMS SHUT” and the flag for the front door is set 
to zero to show the computer it is now closed. (The 
routes from location 4 1 do not need to be changed 
because S wasn’t included in them in the first place. ) 
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MAKING CHANGES 

Changing the program 

Longer descriptions 
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You can change the program in this book as 
much as you like, either to produce 
variations on the haunted house theme or to 
create games with completely different 
settings, descriptions, objects, verbs and 
messages. Remember that the more you 
change, the more complicated it will get as 
you will have to think about how everything 
affects everything else. 

If you are going to write a new game, 
using this program as a guide, then you 
should plan it as described on pages 6 to 15. 
It is worth spending the time planning out 
your game properly as you are less likely to 
find it full of mistakes when you come to run 
the program. 

It is a good idea to start by making small 
changes first to see what happens. If you 
store the master program on tape, you can 
make changes, test them and adapt them 
without losing the original. 

How much spare memory 
have you got? 



The Ha un ted House program itself 
occupies about 7K of RAM before it is run. It 
then needs a further 3 V 2 to 4K for the arrays 
to store the data. Your computer will take 
some memory for its own internal use - up 
to 3K on some models - and it will use a 
further IK or more for the screen. (The 
Spectrum uses 7K which is why Ha un ted 
House won’t fit into the 16K model.) So, if 
you have a 16K computer, you won’t have 
much memory left over, and most of the 
changes you make will have to be 
replacements rather than additions. 


If you have more than 16K, one of the easiest 
ways of making the game more interesting 
to play is to add longer descriptions. 

Instead of “impressive vaulted hall’’ for 
instance, you could say something like “You 
have entered a vast, vaulted chamber with 
pillars extending many times your height 
above you. Light filters in from the east and 
there appears to be a doorway in the 
distance to the west . . ” 



Add a time limit 

Haunted House already has a time limit on 
the life of the candle. You could add an 
overall time limit to the game as well by 
getting the computer to count the number of 
turns the player has had and stop the game 
at a preset number. 

You can do this by adding to line 70 and 
putting an extra line at 485 like this. 


70 V=25: W=36: G= 18: T=0 



You may not need to 
do this as not all 
computers need new 
variables to be set up 
before they can be 
used. 


4S5 T=T+1 : IF T >200 
"MIDNIGHT HAS STRUCK. 

YOU’VE TURNED INTO A BAT " : STOP 



f You can change this number to 
l anything you like. 


Puzzle 

Can you think how to put a limit on the 
number of objects that can be carried at 
any one time? (You will have to adjust the 
scoring routine as well.) 




Adding sounds 



Squeak 

Squeak 


This is an effective way of adding to the 
game without having to make complicated 
changes. You will need to know how your 


computer's sound instructions work. Test 
some sound routines out first to make sure 
they are what you want and then add a 
GOSUB instruction to the line where the 
action occurs, eg IF RM=46 AND C( 1)= 1 
THEN M$=“SOMETHING SCARY IS 
HAPPENING”: GOSUB 6000 
You could add sounds for the front door 
^/slamming, the secret wall breaking, the key 
turning in the door, magic happening when 
you use the magic word and so on. This 
chart gives a few sound routines for various 
computers. The only limit on the number 
you can add is memory. 




FALL OUT OF 
TREE 

DOOR SLAM 

MAGIC 

AXE BLOWS 

GENERAL 

PROMPT 


Is s 

I vV -V 

L. 

m ^ (/ ' V . //V 


B ' 

L 

% 


(hjb 

i -/ j 

^ i\ 


JviC20 

[sPECTF 


POKE 36877,130 
FOR L=15 TO 0 STEP -1 
POKE 36878, L 
FOR 1=1 TO 20: NEXT 1 
NEXT L 

POKE 36877,0 

POKE 36877,130 
FOP 1=15 TO 0 STEP -1 
POKE 36878. L 
FOR N=1 TO 2: NE XT H 
NEXT l 

POKE 36877,0 

POKE 36878,15 

FOR 1=160 TO 240 STEP 5 

POKE 36876,1 

FOR 11=1 TO 100: NEX T 11 

POKE 36876,0 

POKE 36878,15 
FOR 1=1 TO 10 
POKE 36877,200 
POKE 3o877,0 
FOR N=1 TO 400: NEXT h 
NEXT I 

POKE 36878.15 

F0F: 1=1 TO 2 

POKE 36876,200 

POKE 36876.0 

FOR 1=1 TO 400: NEXT 1 

NEXT 1 


— 

— 

FOR 1=5 TO 40 STEP 3 
BEEP 0.2,1 
NEXT 1 

FOR 1=1 TO 10 
BEEP 0.01,0.01 
FOR N=1 TO 100: NEXT 1 
NEXT I 

BEEP 0.5,5 
PAUSE 50 
BEEP 0.5,5 

— 

BBC 

DRAGG 

TRS-CO 

ORIC 


FOR L=-15 TO 0 
SOUND O.L.5. 1 
NEXT L 

FOR l=-15 TO -0 
SOUND ".l, 5,0.6 
NEXT L 

FOR 1=40 TO 160 STEP 5 
SOUND 2,-15, 1,5 
NEXT I 

FOR 1=1 TO 10 
SOUND 0.- 15,5.1 
FOR 1=1 TO 1000: NEXT N 
NEXT I 

SOUND 2,-15,100,2 
FOR 1=1 TO 1000: NEXT 1 
SOUND 2,-15,100,2 

»N/\ 

LOIK 

— 

— 

FOR 1=50 TO 230 STEP 10 
SOUND 1,2 
NEXT 1 

— 

SOUND 180,1 

FOR 1=1 TO 500: NEXT 1 

SOUND 180,1 


FOR 1=15 TO 0 STEP -1 
FLAK 0,2,6,100 
SOUND 5, 100, L 
WAIT 10 
NEXT L 

FLAY 0,0, 0,0 

FOR 1=15 TO 0 STEP -1 
PLAY 0,2,6,100 
SOUND 5,100,1 
WAIT 1 
NEXT L 

FLAK 0,0, 0,0 

FOR L=15 TO 0 STEP -1 
PLAT 0,2,6,100 
SOUND 5,100,1 
WAIT 1 
NEXT L 

PLAY 0,0, 0,0 

FOP 1=1 TO 10 
FLAY 0,1,1,20 
SOUND 4.50,7 
PLAY 0,0, 0,0 
FOR H=1 TO 300: NEXT N 
NEXT I 

FOR 1=1 TO 2 

PLAY 1.0.6,100 

SOUND 1,70,7 

WAIT 20 

PLAY 0.0. 0,0 

FOR 1=1 TO 300: NEXT 1 

NEXT I 


MAKING CHANGES 


Scoring 




£ 


Add line numbers 


DIM T (S) 

FOR 1=1 TO G 
READ T(I) 
NEXT I 


array T with G 
spaces (i.e. number 
v of gettable objects). 


Also change line 1530 as follows: 
1530 IF C(I)= 1 then S=S+T(I) 

Penalties < 


So far, the scoring 
routine has only 
counted plus points 
and not been 
affected by silly 
things the player 
might try to do. You 
could add a penalty 

system quite easily by using a counter, say 
MK, for mistakes. Whenever the player 
does something really silly, you add to MK 
and then subtract it from S when the score is 
worked out at line 1530. If the player falls out 
of the tree, for instance, you could award 
one (or more) penalty points like this: 



Haunted House has a very simple scoring 
system, awarding one point for each object 
the player is carrying. You could change to 
a more interesting system, such as basing 
the score on the value of the object. If you 
assume that the objects are numbered in 
descending order of value, then the 
painting will be the most valuable and the 
key the least. If you change line 1530 like 
this: 

1530 IF C(I)= 1 THEN S=S+G-I 

then the painting will be worth 18—1=17 
and the key 18—18=0. (G is the number of 
gettable objects and I is the number of the 
object the player is carrying.) This makes 
the key valueless as an item of treasure but 
of great value as a useful object because 
without it, the player would not be able to 
get the painting or the goblet. 


If you wanted a more flexible system (and 
you have enough memory), you could set up 
an array to contain object values in the 
initialization routine, like this: 




Use any values you like 


DATA 20,20,30,11,16,25,32,8,25,4,9, 17,3,0, 
30 10 . 12 , 4,9 


It would be nice to 


be able to switch 


off part way 
through a game 
and then carry on 
later from where 
you left off. With 
long, complicated 
games this is a very 
important feature 
and you can include it by adding SAVE and 
LOAD to the verb list. In line 70, change the 
value of V to 27 and add the two new verbs, 
separated by commas, to the end of line 
1665. You will also need to change the ON 
GOSUB line at line 460. 


780 IF F i 1 4 > = 1 THEN f1$= M CRASH YGU FELL OUT 
OF THE TREE H : F ( 1 4 ) =0: HK=HK+1 : RETURN 

Don’t forget that some computers need 
new variables to be defined before they can 
be used. You can do this by adding MK=0 
to the variables in line 70. 

Saving the game 



Put the line numbers of the two new 
subroutines (one for SAVE and one for 
LOAD) between the last two numbers in line 
460 so that they read: 

. . . 1510,3000,4000,1590 


/ 

First new number 



Second new number 


Then add the new subroutines like this, 
checking your computer’s manual to make 
sure the wording is correct. 


#3000 INPUT MS YOUR CASSETTE 
READY TO RECORD": YS 
3010 IF YSOT THEN 3000 
3020 OPEN FILE FOR OUTPUT FROM 
COMPUTER 


3030 PRINT I! ,RH 


^Replace this line 
with your 
computer’s own 
instructions. You 
may not even need 
l line here at all. 



This saves the 
room the 
player is in. 



v 


i FOR 1=1 TO 6 / 
i PRINT II, LU) ' 

' NEXT I 
! FOR 1=1 TO W 
PRINT #1,C(I),F(I) 
i NEXT I 
CLOSE 
i RETURN 

INPUT “ARE YOU READY TO LOADMYS 
i IF YSO'Y" THEN 4000 
OPEN FILE FOR INPUT TO COMPUTER 

i INPUT II, RM 

FOR 1=1 TO G 
i INPUT II, L(I) 

NEXT I 

' FOR 1=1 TO W 
INPUT «1,CU),F(I) 

• NEXT I 
CLOSE 
RETURN 


This loop saves 
positions of 
gettable objects. 



Note that this save routine does not save the 
descriptions and routes in the game. This 
means that the rooms and routes altered by 
the player’s actions will return to their 
original state - the secret wall will be 
rebuilt, the door relocked and so on. (The 
ghosts are probably responsible. ) You 
could save the D$ and R$ arrays if you 
wanted to, by adding extra loops to each of 
the SAVE and LOAD routines. 


Do you give in? 

Like most adventures, Haunted House 
contains traps for the player which can only 
be avoided by using a certain object in a 
certain way. If the player doesn’t have that 
object he is stuck. A “quit” feature would be 
useful in this situation so the player does not 
have to press BREAK or ESCAPE to end the 
game. You can do this by adding QUIT to 
the verb list and putting in a new subroutine, 
as for SAVE and LOAD described on the 
left. 



You must remember to change the 
value of V in line 70, add QUIT to the end of 
line 1665 and insert the new subroutine line 
number in line 460, putting it in the second 
to last position. 

The QUIT subroutine should be 
something like this: 


5000 INPUT "WANT TO QUIT H ;G$ 

5010 IF QJOT THEN RETURN 

5020 INPUT "LIKE TO SAVE GAME FIRST", Q$ 

5030 IF Q$= M Y" THEN GOSUB 3000 



Notice that there is no RETURN at the end of 
this subroutine. This is usually against the 
rules in BASIC but, in this case, the 
computer cannot get confused because the 
program will no longer be running when it 
reaches line 5050. 3 1 


Itlfyou have a BBC , you may need to replace semi-colon with a comma. 


MAKING CHANGES 

Debugging your adventure 

If you write your own version of Ha un ted House or use the routines in it to make a new 
adventure, then you are quite likely to make mistakes. Finding mistakes and puttingthem 
right is called debugging. Here are some of the problems you might come across and some 
suggestions for fixing them. 


>ut of data 




ii 


If the computer gives you an error code which stands for 
“out of data in line x” then it means that the numbers don’t 
tie up in one of your data-reading sections. Check that the 
number of items of data is the same as the number in the 
loop for reading them in. You could have left a comma out 
in the DATA statement perhaps, or missed out one item 
altogether or put the wrong number in the loop. 


DIM ft (4) 

FOR 1=1 TO 4 
READ A(I) 

NEXT I 

DATA SWORD, MONEY, FOOD HATER 


,rray error 


If 


DIM F(3 
FOR 1=1 TO 
READ A(I) 



If you get an array error, it means that you didn’t reserve 
enough space when you DIMmed the array or you 
accidentally put an extra item in the DATA statement 
(perhaps by putting in an extra comma) and then counted 
this extra item when working out the number for the READ NEXT I 
loop. DATA AXE, COFFIN, BLOOD, KEY 


\obj 


ijects behave in strange ways 


I 


This could happen because the program is being directed to the wrong subroutine by 
the ON GOSUB line. Check each number in this line against the subroutine with the same 
number. If these are all correct, check the DATA statement for the verbs to see if their 
order coincides with the order of the subroutines. 

If the program is going to the correct verb subroutine and the verbs are listed in the 
correct order, check that there is a RETURN line at the end of each subroutine. If this is 
missing, the computer will “fall through” the program to the next subroutine down which 
may produce some strange results. 

If none of the above things solves the problem then check through the conditions in 
the subroutine carefully. You might have missed something out or got a sign wrong or 
used the wrong variable by mistake. Check the override conditions and flags which 
occur earlier in the program too. 
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Exits in funny places 



If you find a wall you can walk through or a doorway you can’t, you may have made a 
mistake in planning your routes or in typing in the route data. Check your route map 
against the data lines to find the mistake. 


1 


Objects don't appear where the\ 
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If an object appears in the wrong place then you’ve probably made a mistake in the data 
for array L. If an object doesn’t appear at all, check the flag array. You must have set the 
flag with that object number to 1, which means that the object is there but the computer 
won’t tell you. You need to set the flag to zero. Check the initialization routine where the 
flags are set up and then the flag references throughout the program. 


INPUT & INPUT ANALYSIS DESCRIPTION & FEEDBACK 


PROGRAM LISTING 

The Haunted House listing 

This is the program listing for the Haunted House adventure. It should run on any 
computer which uses Microsoft-style BASIC and which has a minimum of 16K of RAM. You 
may have to make a few minor changes for your computer - look out for comments next to 
certain lines in the listing. If you have a VIC 20 or an Oric, there are a few extra lines anda 
line change which you will find at the end of the listing on page 37. If you have a BBC Model 
A, use mode 7. 

This listing will not work as it is on Sinclair (Timex) computers. If you have a Spectrum 
(Timex 2000), turn to page 38 for changes to make to the program. If you have aZX8 1 
(Timex 1000) there is a special listing for you on pages 39 to 45. 

As this is a long program, you will have to be extremely careful when you type it in. The 
smallest mistake could prevent it running properly and will be very difficult to find once 
you’ve typed the whole program in. Check each line as you go, especially the ON GOSUB 
and DATA lines. Some of the program lines are so long that they take up two or more lines 
on the printed page. Look out for these and make sure you do not press RETURN or ENTER 

until the end of the program line. /1i y o» to ve,viC20, change" 


CLS to PRINT CHR$( 147). If you 
have an Apple change it to 

HDMF 




Line 70 sets up the 
variables. V is number of 
verbs, W is number of 
object words, G is 
number of “gettable” 
objects. 


10 REN HAUNTED HOUSE ADVENTURE 
20 REN HHHHHHHHHHHI 
30 REM THIS VERSION FOR ■MICROSOFT" BASIC 
40 REM REQUIRES A MINIMUM OF 16K 
50 REM SELECT 'TEXT MODE” IF NECESSARY 
£>0 REM HHumwtwmwm wtW: 

65 CLEAR 100 
70 V=25: W=36: G=18 
m GOSUB 1600 

*90 CLS: PR I NT ‘HAUNTED HOUSE 
100 PRINT 

110 PRINT "YOUR LOCATION 1 
120 PRINT D$(RM) 

130 PRINT "EXITS: 

140 FOR 1 = 1 TO LENIRKRM! ) 

150 PRINT HID$(R$(RH! ,1,1) 

160 NEXT I 
170 PRINT 
180 FOR 1 = 1 TO G 

190 IF L(I)=RM AND FI1)=0 THEN PRINT "YOU CAN SEE ‘lOJdj; 1 
200 NEXT I 

210 PRINT *============ 

220 PRINT H*:H$=*«HAT' 

230 INPUT "WHAT KILL YOU DO NOW’tei 
240 V$=“ : N$= ‘ " : VB=0: 0B=0 
250 FOR 1=1 TO LEN'Ol) 

260 IF HID$ (9$, 1, 1 ) = " " AND V$=""THEN Vf«LEFTH«,I-l) 

270 IF MID$!Qt, I+l,l)<>" ' AND V$<>"" THEN W*=HID* (B*, I + 1 , LEN !Q$) -1 ) : I=LEH(Q$) 
280 NEXT I 

290 IF N$=*‘ THEN V$=fit 
300 FOR 1=1 TO V 
310 IF Vt=V$!I) THEN V8=! 

320 NEXT I 
330 FOR 1=1 TO N 
340 IF W$=Q$(I! THEN LET 0B=I 


See page 20 to find out 
how the description and 
feedback section works. 


HERE" 


y 
/ 2 



If you have a BBC, you 
may need a comma here 
instead of a semi-colon. 



See pages 2 1 -22 to find 
out how the input section 
works. 


BRANCH TO ERROR MESSAGES 

VERBS 3-9 VERB 2 VERB 1 SUBROUTINES OVERRIDE CONDITIONS 



VERB 17 VERB 16 VERB IS VERB 14 VERB 13 VERB 12 VERBS 10 & 1 1 


820 IF RM=54 AND C 415) <>1 THEN Mt="Y0U’RE STUCK! RETURN 

830 IF C 415) = 1 AND NOT <RN=53 OR RM=54 OR RM=55 OR RM=47) THEN Mt=‘Y0U CAN’T CARRY A BOA 
F ! “ : RETURN 

840 IF 1RM>26 AND RH<30) AND F(0>=0 THEN M$= M T0Q DARK TO MOVE": RETURN 'i 


850 F 435) =0: RL=LEN (R$ (RM> ) 

860 FOR 1=1 TO RL 

870 U$=HID$(Rt(RM),I,l) 

880 IF (U$="N" AND D=1 AND F(35)=0)THEN RH=RM-8:F(35)=1 

890 IF 4U$= , S" AND D=2 AND F(35)=0)THEN RH=RH+8: F 435) =1 

900 IF (U$=“W" AND D=3 AND F(35)=0)THEN RM=RM-1:F(35)=1 

910 IF (U$="E“ AND D=4 AND F!35)=0)THEN RM=RM+1:F!35>=1 

920 NEXT I 

930 H$="OK” 4 


uo y 
& / 


If you are using a VIC 20, 
you could shorten the 
messages to 22 
characters or make sure 
the spaces fall in the 
right places so the 
messages look better on 
the screen. 


950 IF D< 1 THEN M$="G0 WHERE?" 

960 IF RH=41 AND F(23)=l THEN R$i49)="SW" :M$="THE DOOR SLAMS SHUT ! ‘ : F 423) =0 
,970 RETURN 

080 IF 0B >8 THENM$="I CAN’T GET "+W$: RETURN 
985 IF L40B) <> RM THEN M*="IT ISN’T HERE- 
990 IF F40B) <>0 THEN H$="WHAT "+W$+"7" 

1000 IF C (0B) =1 THEN M$=*YQU ALREADY HAVE IT- 

1010 IF 0B>0 AND L (0B) =RH AND F(0B)=0 THEN C(0B)=1:L(08>=65:N*="Y0U HAVE THE "+W$ 

J020 RETURN 

^030 IF RM=43 AND (0B=28 OR 0B=29) THEN F(17)=0:M$="DRAWER OPEN' 

1040 IF RM=28 AND 0B=25 THEN M$=“IT’S LOCKED" 

1050 IF RM=38 AND 0B=32 THEN Mt="THAT’S CREEPY I": F (2) =0 
0060 RETURN 

^n>70 IF 0B=30 THEN F ( 18) =0: «$= “SOMETHING HERE" 

1080 IF 0B=31 THEN M$=’THAT’S DISGUSTING!" 

1090 IF (0B=28 OR 0B=29) THEN M$="THERE IS A DRAWER" 

1100 IF 08=33 OR QB=5 THEN GOSUB1140 

1110 IF RM=43 AND 0B=35 THEN M$=“ THERE IS SOMETHING BEYOND.." 

1120 IF 0B=32 THEN G0SUB1030 
0130 RETURN 

0140 IF RM=42 AND QB=33 THEN M$="THEY ARE DEMONIC WORKS" 

1150 IF (0B=3 OR 0B=36) AND C<3)=1 AND F434)=0 THEN M$="USE THIS WORD WITH CARE ’ XZfiNFAR’ " 

Use your computer s 

1160 IF C (5) =1 AND 0B=5 THEN Mt="THE SCRIPT IS IN AN ALIEN TONGUE" form of RND here. 

0.170 RETURN V / 

0180 M$=”0K ’"+W$+"’" 

1190 IF C 4 3 ) = 1 AND 0B=34THENM$="»MAGIC OCCURS*": IF RMO-45 THEN RM=RND(63>CT ^ 0^ 
1200 IF C (35 = 1 AND 0B=34 AND RM=45 THENF(34)=1 ) I 

0210 RETURN ' 

0220 IF C ( 12) =1 THEN M*=”YOU MADE A HOLE" 

1230 IF C(12)=l AND RM=30 THEN MI="DUG THE BARS OUT":B*(RM)="HOLE IN WALL’:RttRM!="NSE" 
0240 RETURN 

0250 IF C( 14) <>1 AND RM=7 THEN M$=”THIS IS NO TIME TO PLAY GAMES" 

1260 IF 0B= 14 AND C(14)=l THEN M$="YOU SWUNG IT" 

1270 IF 0B=13 AND C(13)=l THEN MI="WHOOSH!" 


INITIALIZATION VERB 25 24 VERB 23 VERB 22 VERB 21 VERB 20 VERB 19 VERB 18 


PROGRAM LISTING 


1280 IF 08=13 AND C(13)=l AND RH=43 THEN R$ (RH) ="WN Dt i RH) = "STUDY WITH SECRET R00H":H$=" 

YOU BROKE THE THIN NALL" 
sJ290 RETURN 

H300 IF 08=14 AND C!14)=l THEN H$="IT ISN’T ATTACHED TO ANYTHING! “ 

1310 IF 08=14 AND C < 1 4 i <>1 AND RH=7 AND Fil4)=0 THEN N$="Y0U SEE THICK FOREST AND CLIFF 
SOUTH" : F ( 14) =1 : RETURN 

1320 IF 08=14 AND C(14) <>1 AND RM=7 AND Fil4)=l THEN Nt= n G0IN6 DOWN ! ” : F ( 1 4 i =0 
iJ330 RETURN 

H340 IF 08=17 AND C(17) = l AND C(3)=0 THEN N$="IT WILL BURN YOUR HANDS" 

1350 IF 08=17 AND C(17)=l AND C!9)=0 THEN H4="N0THING TO LIGHT IT WITH" 

1360 IF 08=17 AND C(17) = l AND C(9)=l AND C(B) = 1 THEN N$=*IT CASTS A FLICKERING LIGHT": F (0 ) =1 

1370 RETURN 

HSO IF F(0>=1 THEN F(0)=0:M$=*EXTINGUISHED" 

1390 RETURN 

1400 IF 08=26 AND Cil6) = l THEN li$='HISSSS" 

1410 IF 08=26 ANDC ( 1 6) =1 AND F(26)=l THEN F(26)=0:M$='PFFT! GOT THEN" 

1420 RETURN 

430 IF 08=10 AND CilO)=l AND C(ll)=l THEN M$="SWITCHEO 0N":F!24)=1 
1440 IF F (27) =1 AND Fi24i=l THEN M$="WHIZZ- VACUUMED THE GHOSTS UP'":F(27)=0 
1450 RETURN 

1460 IF RH=43 AND (08=27 OR 08=28) THEN G0SUB1030 

1470 IF RM=28 AND 08=25 AND F(25i=0 AND C(18)=l THEN F(25)=l:R$(RM)="SEW , :Dt(RM)="HUGE OP 

:EN DOOR“:N$= n THE KEY TURNS!" 

480 RETURN 

1490 IF C (OB) =1 THEN C ( OB ) =0: L (OB 5 =RM : H$= " DONE " 

1500 RETURN 
1510 S=0 

1520 FOR 1=1 TO G 
1530 IF C!I)=1 THENS=S+1 
1540 NEXT I 

1550 IF S=17 AND C(15)<>1 AND RH 057 THEN PRINT"YOU HAVE EVERYTHING" : PRINT"RETURN TO THE 
GATE FOR FINAL SCORE" 

1560 IF S=17 AND RH = 57 THEN PRINT'DOUBLE SCORE FOR REACHING HERE! B :S=S$2 
1570 PRINT'YOUR SCORE=";S:IF S>18 THEN PRINT n WELL DONE 1 YOU FINISHED THE GAHE" : END 
1580 INPUT "PRESS RETURN TO CONTINUE";Q$ 

M590 RETURN 

/1600 DIMR$(63),D$(63),0»(W),V$(V) 

1610 DIHC(Wi,L(G),F!W) 

1620 DATA46, 38, 35, 50, 13, 18, 28, 42, 10, 

|25,26,4,2,7,47.60,43,32 
1630 FOR 1=1 TO G 

1640 READ L ( I ) V ' 

1650 NEXT I 

1660 DATAHELP, CARRYING?, 60, N, S, W, E,U, D, GET, TAKE , OPEN, EXAMINE, READ, SAY 
1665 DATADI6,SWING,CLIHB, LIGHT, UNLIGHT, SPRAY. USE, UNLOCK, LEAVE, SCORE 
1680 FOR 1=1 TO V 
1690 READ V$(I) 

1700 NEXT I 



If you have a BBC, you 
may need a comma here 
instead of a semi-colon. 
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Notice that data items 
are separated by 
commas. If you change 
the data, make sure you 
don’t try to include 
commas in it or you will 
confuse the computer. 


1 7 1 0 D AT ASE , NE , WE , SHE , HE , WE , SHE , WS 
1720 DAThNS,SE,WE,NW,SE,W,NE,NSW 
1 730 DATANS, NS, SE, NE, NWUD , SE , WSUD , NS 
1740 DATAN , NS , NSE , WE , WE , NSW, NS, NS 
1 750 DATAS, NSE , NSW, S, NSUD, N, N, NS 
1760 DAT ANE , NW , NE , W , NSE , WE , W , NS 
1770 DATASE, NSW, E, WE, NW,S, SW,NW 
1 780 DAT ANE , NWE , HE , WE , WE , NWE , NWE , W 
1790 FOR 1=0 TO 63 
1800 READR$(I) 

1810 NEXT I 

1820 DATA DARK CORNER, OVERGROWN GARDEN, BY LARGE WOODPILE, YARD BY RUBBISH 
1825 DATA WEEDPATCH, FOREST, THICK FOREST, BLASTED TREE 

1340 DATA CORNER OF HOUSE, ENTRANCE TO KITCHEN, KITCHEN i GRIMY COOKER, SCULLERY DOOR 

1845 DATA ROOM WITH INCHES OF DUST, REAR TURRET ROOM, CLEARING BY HOUSE, PATH 

I860 DATA SIDE OF HOUSE, BACK OF HALLWAY, DARK ALCOVE, SMALL DARK ROOM 

1865 DATA BOTTOM OF SPIRAL STAIRCASE, WIDE PASSAGE, SLIPPERY STEPS, CLIFFTOP 

1830 DATA NEAR CRUMBLING WALL, GLOOMY PASSAGE, POOL OF L I GHT, IMPRESSIVE VAULTED HALLWAY 

1885 DATA HALL BY THICK WOODEN DOOR, TROPHY ROOM, CELLAR WITH BARRED WINDOW, CLIFF PATH 

1900 DATA CUPBOARD WITH HANGING COAT, FRONT HALL, SITTING ROOM, SECRET ROOM 

1905 DATA STEEP MARBLE STAIRS, DINING ROOM, DEEP CELLAR WITH COFFIN, CLIFF PATH 

1920 DATA CLGSET, FRONT LOBBY, LIBRARY OF EVIL BOOKS, STUDY WITH DESK & HOLE IN WALL 

1925 DATA WEIRD COBWEBBY ROOM, VERY COLD CHAMBER, SPOOKY ROOM, CLIFF PATH BY MARSH 

1940 DATA RUBBLE-STREWN VERANDAH, FRONT PORCH, FRONT TOWER, SLOPING CORRIDOR 

1945 DATA UPPER GALLERY, MARSH BY WALL, MARSH, SOGGY PATH 

1960 DATA BY TWISTED RAILING, PATH THROUGH IRON GATE, BY RAILINGS, BENEATH FRONT TOWER 
1965 DATA DEBRIS FROM CRUMBLING FACADE, LARGE FALLEN BRICKWORK, ROTTING STONE ARCH, CRUMBLING 
CLIFFTOP ^ 

1980 FOR 1=0 TO 63 
1990 READD* i I ) 

2000 NEXT I 

2010 DATAPAINTING, RING, MAGIC SPELLS, GOBLET, SCROLL, COINS, STATUE, CANDLESTICK 
2012 DATAMATCHES, VACUUM, BATTERIES, SHOVEL, AXE, ROPE, BOAT, AEROSOL, CANDLE, KEY/ 

2014 DATANORTH, SOUTH, WEST, EAST, UP, DOWN L 

2016 DATADOOR, BATS, GHOSTS, DRAWER, DESK, COAT, RUBBISH 
2018 DATACOFFIN, BOOKS, XZANFAR, WALL, SPELLS 
2060 FOR 1=1 TO W 
2070 READO* ( I ) 

2080 NEXT I 

2090 F(18)=l:F(17)=l:F(2)=l:Fi26)=l:F(28>=l:F123)=l:LL=60:RM=57:M$=‘0K" 

2100 RETURN 

VIC and Oric changes 

If you have a VIC 20 or an Oric, use these lines instead of line 460 in the main listing. 



Make sure you type the 
data in the correct order 
or strange things will 
happen when you try to 
play the game. 


455IF V8M4 THEN 801046-5 

4 60 ON vB GOSUB 500,570,640,640,640,640,640,640,980,980, 1030, 1070,1140 
463G0T0470 

4650N VB-14 GOSUB 1180, 1220, 1250, 1300, 1340, 1300. 1400, 1430, 1460, 1490, 1510, 1590 
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SPECTRUM VERSION 

Changes for the Spectrum (Timex 2000) 


Sinclair (Timex) computers use a version of 
BASIC which differs quite a lot from the 
BASIC on other popular computers, so you 
will have to make quite a lot of changes to 
make it work. These changes make the 
program slightly too long to fit into a 16K 
Spectrum. You could, however, try 
adapting the program to fit by cutting out 
some of the verbs, for example, and 
shortening the messages. 


Use the lines listed below to replace lines 
in the main program and also change the 
main program as follows: 

1 . The Spectrum needs LET every time you 
assign a value to a variable e.g. LET V=25. 
This affects many lines, including all the 
ones containing IF . . . THEN, so be careful. 

2. All the string data in lines 1660, 1665, 
1710-1780, 1820-1965 and 20 10-2018 must be 
put in quotes, like this: 

1 820DAT A“D ARK CORNER”, 
“OVERGROWN GARDEN”, etc. 

3. In lines 1790 and 1980, change the loop to 
read FOR 1= 1 TO 64. (The Spectrum won’t 
allow you to use the box labelled zero in an 
array.) 


60 LETFf =” 

120 PRINT D$(RM+1) 

140 FOR 1=1 TO LEN (Rf (RH+1 ) ) 

150 PRINT R*!RM+11 (I TO I>;\"; 

240 LET X$="":LET «$="";LET VB=0:LET OEM) 

250 FOR 1=1 TO LEN (Q$) -1 

260 IF QKI TO !)=" “ AND .)$="“ THEN LET X*=Q$f TO 1-11 
270 IF 81(1+1 TO 1 + 1)0“ ’ AND X$="" THEN LET N$=8$(I+1 TO) : LET I=LEN(Q$)-1 
290 IF «$="" THEN LET X$=B$ 

295 IF LEN(X$) > LEN(V*(1!) OR X$="" THEN GOTO 325 ' Remember that if you type in the data 

296 LET X$=X$+F$ ( TO (LEN(V$(1))-LEN(X*!)! 

310 IF X$=V$ ( I ) THEN LET VB=I 

325 IF «*="" OR LEN (Hi) >LEN(0t(l) 1 THEN GOTO 360 

326 LET W$=W$+F$( TO (LEN (OKI)) -LEN («$))) 

405 IF QB=0 THEN G0T0420 

420 IF F (261=1 AND RN=13 AND I NT (RNBt 3+1 ) < >3 AND VB 021 THEN LET ««=“BATS ATTACKING^ 
430 IF RH=44 AND INT (RNDI2) = 1 AND F!24X>1 THEN LET F(27)=l 

440 IF F (201=1 THEN LET LL=LL-1 ^ ^ 

450 IF LK1THEN LET F(20)=0 


in capital letters, you must play the 
game using capitals - the computer 
does not recognize that “GO WEST" 
and “go west” are the same thing. It is 
best to keep the caps lock on all the 
time. 


460 GQSUB 500$ (VB=1) +5701 (VB>2 AND VB< 10+980* <VB=10 OR VB=1 1 1 +1030* (VB=12) +1070* (VB=13>+1 
140* (VB=14) +1180* f VB=15) +1220* ( VB=16) +1250* <VB=17)+1300* ! VB=18)+i 340* (VB=19) +1380* (VB=20) + 
1400* (VB=21)+1430* ( VB= 22 1 + 1 460 * ( VB= 23 ) + 1 490 * ( VB=24 1 +1510* (VB=25)+1590*(VB=26) 

800 IF (RM=26 AND F(20)=0) AND (D=l OR D=4) THEN LET N$="Y0U NEED A LIGHT'tRETURN 
840 IF (RH>24 AND RH<30) AND F(20)=0 THEN LET H$="T0Q DARK TO MOVE": RETURN 
850 LET F ( 355 =0: LET RL=LEN!R$(RH+1) ) 

870 LET U$=Rt(RN+l) (I TO I) 

960 IF RN=41 AND F(23)=l THEN LET R$ ( 50) = "SW" : LET M$="THE DOOR GLAUS SHUT! LET F!23)=0 
980 IF 0B>G OR 0B=0 THEN LET N$="I CAN’T GET “+H$: RETURN 

1190 IF C(3)=l AND 0B=34 THEN LET flf=" tMASIC OCCURS* 8 : IF RH<>45 THEN LET RH=INT(RND$64) 

1230 IF C! 121=1 AND RH=30 THEN LET H$="DUG THE BARS OUT" :LET D$(RH+1)=“H0LE IN WALL" :LET 
R$(RM+1)=-NSE" 

1280 IF QB=13 AND C(13)=l AND RN=43 THEN LET R$ (RM+1 > ="WN” : LET D* (RN+1!=“STUDY WITH SECRE 
T ROOM’ : LET H$="Y0U BROKE THE THIN WALL" 

1360 IF 0B= 17 AND C(17)=l AND C!?!=l AND C(8)=l THEN LET M$="IT CASTS A FLICKERING LIGHT" 

: LET F (201=1 

1380. IF F (201=1 THEN LET F(20)=0:LET (^"EXTINGUISHED" 

1470 IF RH=28 AND 0B=25 AND F(251=0 AND Cf 181-1 THEN LET F(25)=1;LET R$(RN+1)="SEW":LET D 
$(RH+U=*HL*GE OPEN DOOR": LET H$="THE KEY TURNS'" 

1600 DIH R$(64,4! :DIH D$(64,4i:DIH 0$((W,13):DIH V$(V,9) 
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ZX81 (Timex 1000) version 


The program listing on the next six pages is 
a special version of Ha un ted House for the 
ZX8 1 . It sticks as closely as possible to the 
structure of the main program, so you can 
follow the explanations of the program 
given throughout this book. The main 


differences are that the ZX8 1 will accept 
only one statement on each line and it does 
not have the commands READ . . . DATA. 
The program has been rewritten to take 
account of these and other differences in 
the BASIC which you will see pointed out on 
the listing. 



Notice that the locations are 
numbered starting with 1, as 
the ZX8 1 will not allow you to 
use the zero box in an array. 


ZX 81 masterplan 


These changes take up quite a lot of 
memory space. In order to make the game 
fit, the number of locations has 
been cut from 64 to 36 and other data 
changed slightly to fit with this. The ZX8 1 
version of the master plan is shown below. 
Y ou can find out how the data is put into the 
computer’s memory over the page. 


1 

ENTRANCE 
TO KITCHEN 

2 

KITCHEN 
, 

3 

SCULLERY 

4 

4 

DUSTY 

ROOM 

REAR 

TURRET 

ROOM 

6 

CLOSET 

WITH 

COAT 

/ 

7 

BACK OF 
HALLWAY 

8 & 

DARK 

ALCOVE 

9 

SMALL 

ROOM 

WITH 

RUBBISH 

10 

SPIRAL 

STAIRCASE 

11 

WIDE ££ 

PASSAGE ^ 

12 

SLIPPERY 

STEPS 

HALLWAY J 

TO REAR B 

14 finp, 

POOL OF 
LIGHT 

15 

VAULTED 

HALL 

16 

HALL WITH 
LOCKED DOOR 

17 

TROPHY 

ROOM 

18 

CELLAR 





y 



19 

] 

20 

21 

22 

23 

24 

FRONT 

HALL 

SITTING 

ROOM 

SECRET 

ROOM 

STEEP 

MARBLE 

STAIRS 

DINING 

ROOM 

VAULT 

WITH 

COFFIN 

25 

26 

27 


28 

29 

30 

FRONT 

LOBBY 

LIBRARY 

j 

L STUDY 

u 

COBWEBBY 

ROOM 

COLD 

CHAMBER 

SPOOKY 

ROOM 

31 

32 

33 


34 

35 

36 

FRONT 

PORCH 

| 

FRONT 

TOWER £r3 

SLOPING 

CORRIDOR 

UPPER 

GALLERY 

BOAT 

HOUSE 

SOGGY 
^ PATH 







& 

cOL 
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INPUT & INPUT ANALYSIS DESCRIPTION & FEEDBACK 


ZX81 LISTING 

Howto use the program 


If you look through this listing, you will 
notice that the data for the game is not 
incorporated in the program. The program 
works by asking you to type in the data and 
then saving the whole program, including 
the data, on tape. You only need do this 
once - next time you want to play the game, 
all you have to do is load the tape. 

Follow these instructions to use the 
program: 

1. Type in the program (very carefully). 

2. Type RUN 2440. 


3. Now type in the data in the following 
order (see page 45 for lists of data): 

a) location descriptions 

b) routes 

c) object words 

d) verbs 

The program stops after each section so 
you can re-enter any data which you put 
in incorrectly. If, for instance, you want to 
put the verb data in again, type GOTO 
2720. If you want to carry on to the next 
input section, type CONT, followed by 
NEWLINE. 


vr 

10 GOSUB 2200 
20 CLS 

30 PRINT "HAUNTED HOUSE ADVENTURE" 

40 PRINT " ' 

50 PRINT "YOUR LOCATION:" 

60 PRINT D$(R») 

70 PRINT "EXITS: " 

80 FOR 1=1 TO LEN(R$(RM) ) 

90 PRINT R$(RH) (I TO I); V; 

100 NEXT I 
110 PRINT 
120 FOR 1=1 TO 6 

130 IF L(!)=RH AND FU)=0 THEN PRINT "YOU CAN SEE 
140 NEXT I 

150 PRINT "====================" 

160 PRINT N* 

VJ70 LET M$= ” WHAT ?" 

/M80 PRINT "WHAT WILL YOU DO NOW 
190 INPUT Q* l tT 

200 LET XI= Bi ) 

210 LET W$="" 

220 LET VB=0 
230 LET QB=0 

240 FOR 1=1 TO LEN(9*}-1 

250 IF Q$(I TO I)=" " AND X$="" THEN LET X*=Q$(T0 1-1) 
260 IF QSII+1 TO 1+1)0" " AND X*<> B " THEN LET W$=8$(I+1 
270 IF W$<> Bi THEN LET I=LEN(Q$M 
280 NEXT I 

290 IF W$= H " THEN LET X$=Q$ 

300 IF LEN(X$) >LEN(V$(1) ) OR X$="" THEN GOTO 420 
310 LET F=LEN(V$(1))-LEN(X$) 

320 LET X$=X*+F$(TQ F) 

330 FOR 1=1 TO V 
340 IF X$=V$(I) THEN LET VB=I 
350 NEXT I 

360 IF W$= M " OR LEN ( W$ ) >LEN (0$ ( 1 ) ) THEN GOTO 430 


4. Now SAVE the program on tape. This will 
save all the data as well. 

5. To start the game, type GOTO 10. DO 
NOT TYPE RUN, as this will destroy all 
the variables. 

6. Now input the starting positions of the 
objects. When you input the last of these 
( 18) the program will give you your 
starting location. 

7. For a new game, repeat steps 5 and 6. 

8. When you load the program from tape, 
start these instructions at step 5. 


;0*(I);" HERE" 


WC| 



The ZX8 1 needs LET when a 
value is assigned to a variable. 



This section looks a bit 
different to the main program 
because the ZX8 1 does not use 
MID$, LEFTS and RIGHTS to 
take a section of a string. 
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BRANCH TO ERROR MESSAGES 

VERBS 3-9 VERB 2 VERB 1 SUBROUTINES OVERRIDE CONDITIONS 


X 


Notice that some of the 
program lines are longer than 
the printed lines on the page. 
Make sure you don’t press 
NEWLINE before the end of 
the program line. 


370 LET F=LEN!0$(1))-LEN!W$) 

380 LET W$=W$+F$(TQ F) 

390 FOR 1=1 TO W 
400 IF W$=0$!I) THEN LET 08=1 
410 NEXT I 

420 IF W$>"“ AND OB=0 THEN LET N$=‘THATS SILLY" 

430 IF VB=0 THEN LET VB=V+1 
440 IF W$="’ THEN LET M$=*I NEED TN0 WORDS" 

450 IF VB>V AND 0B>0 THEN LET M$="Y0U CANT "+6* 

460 IF VB)V AND 0B=0 THEN LET N$="Y0U D0NT HAKE SENSE’ 

470 IF 0B=0 OR 0B>6 THEN 60T0 490 

480 IF VB<V AND 0B>0 AND C(0B>=0 THEN LET N$=‘Y0U D0NT HAVE "+W* 

490 IF F (26) =0 OR RN<>5 OR INT«RND*3)=2 OR VB=21 THEN 60T0 520 
500 LET H$="BATS ATTACKING" 

510 60T0 20 

520 IF RM=28 AND INT!RND*2)=I AND F (24)=0 THEN LET F (27)=1 
530 IF Fi2Q!=l THEN LET LL=LL-1 
540 IF LL< 1 THEN LET F(20>=0 
550 60SUB 590* ( VB=1 ) +660* ( V8=2) +730* ( VB>2 AND VB< 10! +1 160* <VB=10 OR VB=1 1 ) +1270* (VB=12) 
+1350* (VB=13) +1 440* ( VB= 14! +1480* ( VB=1 5) +1540* !VB=16)+1560*(VB=17)+1640*(V B=18) +1700* (VB=19 
+1760* ( VB=20) +1800* (VB=21> +1850* (VB=22) +1920* (VB=23) +1990* (VB=24) +2040* (VB=25) +2190* (VB=26) 
560 IF LL=10 THEN LET N*="Y0UR CANDLE IS WANING" 

570 IF LL=1 THEN LET H$="Y0UR CANDLE IS OUT" 

580 GOTO 20 



. 


590 PRINT "WORDS I KNOW" 

600 FOR 1=1 TO V 
610 PRINT V$(l)!","i 
620 NEXT I 
630 LET Ht=” 

640 G0SUB 2160 
650 RETURN 

660 PRINT "YOU ARE CARRYING:" 

670 FOR 1=1 TO G 
680 IF C! I ) = 1 THEN PRINT 0$!I); 

690 NEXT I 
700 LET H*="" 

710 GOSUB 2160 
V720 RETURN 
/730 LET D=0 

740 IF 0B=0 THEN LET D=VB-3 
750 IF 0B>18 AND 08<25 THEN LET D=0B-18 
760 IF RN=10 AND D=5 THEN LET D=1 
770 IF RH= 10 AND 0=6 THEN LET D=3 
780 IF RH=12 AND D=6 THEN LET D=2 

790 IF Rf1= 12 AND D=5 THEN LET D=3 

BOO IF R 11=22 AND D=6 THEN LET D=1 

810 IF R 11=22 AND D=5 THEN LET D=2 

820 IF RN<>32 OR D<>3 THEN GOTO 850 
830 LET N$=*!TS A LONG DROP" 


This line replaces the ON 
GOSUB line, which the ZX8 1 
can’t do. It works like one long 
calculation, using the value of 
VB. The computer looks at 
each of the brackets containing 
“VB=” and puts a 1 if the 
bracket is true and a zero if it 
isn't. Try working through the 
calculation using a particular 
value of VB to see how it works. 


0 

1 

; 




This replaces the tree section 
in the main program. Check 
the plan if you want to see what 
location 32 is. 
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VERB 12 VERBS 10 & 11 


ZX81 LISTING 


840 RETURN 

850 IF F!27)=0 OR RH<>34 THEN GOTO 880 
860 LET H$="GH0STS WILL NOT LET YOU HOVE* 

870 RETURN 

880 IF RH<>29 OR C ( 1 ) =0 OR F (341=1 THEN GOTO 910 
890 LET H$="HAGICAL BARRIER TO THE WEST' 

900 RETURN 

910 IF R«< 14 OR RH>17 OR F(20)=l THEN GOTO 950 
920 IF RN=14 AND DOl AND D<>4 THEN GOTO 950 
930 LET H*="TOO DARK TO HOVE" 

940 RETURN 

950 IF CT 151=0 OR RH<>36 THEN GOTO 980 ./ 

960 LET H$="THE BOAT IS TOO HEAVY" 

970 RETURN 

980 LET RL=LEN(R$(RH) 1 
990 LET OH=RH 
1000 FOR 1=1 TO RL 
1010 LET U$=R$(RH) (I TQ I) 

1020 IF U$="N" AND D=1 THEN LET 0H=0H-6 

1030 IF U$=‘S" AND D=2 THEN LET 0H=0H+6 

1040 IF U$=’W" AND D=3 THEN LET QH=0H-1 

1050 IF U$='E" AND D=4 THEN LET 0H=QH+1 

1060 NEXT I 
1070 LET H$=’OK" 

1080 IF RH=OH THEN LET M$=*CANT GO THAT WAY" 

1090 LET RH=OM 

1100 IF D<1 THEN LET Mi=“GO WHERE ?* 

1110 IF RH<>25 OR F(23)=0 THEN GOTO 1150 
1120 LET R$(31)=" 

1130 LET H$="THE DOOR SLAHS SHUT BEHIND YOU" 

1140 LET F (231=0 
.1150 RETURN 

1160 IF 0B>0 AND OB<=G THEN GOTO 1190 
1170 LET H$="YOU CANT GET "+W$ 

1180 RETURN 

1190 IF LiOBlORH THEN LET H*="ITS NOT HERE" 

1200 IF F (OB) =1 THEN LET H»="NHAT "+W$+" ?" 

1210 IF C (OB) =1 THEN LET H$="YOU ALREADY HAVE IT" 
1220 IF LiOBlORH OR F(0B)=1 THEN GOTO 1260 
1230 LET C ( OB 1 = 1 
1240 LET H$="YOU HAVE THE "+W4 
1250 LET L! OB 1=37 
.1260 RETURN 

1270 IF RH<>27 OR (0BO2B AND 0BO29) THEN GOTO 1300 
1280 LET H$= “DRAWER OPEN" 

1290 LET F (171=0 (_ 

1300 IF RH=16 AND 0B=25 THEN LET H$="IT IS LOCKED" 
1310 IF RH<>24 OR 0BO32 THEN GOTO 1340 CZ~ 
1320 LET H$="CREEPY" 


Check each line before you 
press NEWLINE. It is much 
easier to try and spot your 
mistakes as you type than 
having to search through the 
whole listing to find them. 



See pages 24-25 for 
more about how the 
subroutines work. 



Imagine your adventure is 
going to be sold in a famous 
chain of shops and design 
and write an atmospheric 
insert for its cassette box. 



VERB 20 VERB 19 VERB 18 VERB 17 16 VERBIS VERB 14 VERB 13 


LET F (2) =0 f „ . 

Check the two versions of 

Haunted House against each 

IF QBO30 THEN 60T0 1380 other to see where the 

LET ^‘SOMETHING HERE 1 l programs differ. 

LET F ( 13) =0 g 

IF 0B=28 OR 0B=29 THEN LET H*=" THERE IS A DRAWER' 

IF 0B=33 OR 0B=5 THEN GOSUB 1440 

IF R 11=27 AND 0B=35 THEN LET H$="S0NETHIN6 BEYOND' 

IF 0B=32 THEN GOSUB 1270 

IF RH=9 AND 0B=31 THEN LET H$="THATS DISGUSTING" 

RETURN 

IF RH=26 AND 0B=33 THEN LET H$="THEY ARE DEH0NIC N0RKS" 

IF (0B=3 OR 0B=36> AND C!3)=l AND F(34)=0 THEN LET H*='USE 
WORD WITH CARE - YZANFAR* 

IF C (5) =1 AND QB=5 THEN LET «$='AN ALIEN TONGUE" 

RETURN 

LET H$="0K "+H$ f Don . tforget , y 

1 IF C ( 3) =0 OR OIK >34 THEN GOTO 1520 extra verbs w 

LET H*="HAGIC OCCURS" extrasubrouti 

■ IF RH<>29 THEN LET RH=INT(RND*36>+1 SJjKSdl 

IF C(3)=l AND 0B=34 AND RN=29 THEN LET F(34) = l l the EXAMINE 

i RETURN V 

IF CU2)=1 THEN LET Ht=’Y0U HAVE HADE A HOLE' 
i RETURN 

IF C ( 14) < >1 AND RH=11 THEN LET H$=’THIS IS NO TIHE FOR GAMES' 
i IF 0B=14 AND C(14)=l THEN LET H$='Y0U SWUNG IT' < 

IF 0B=13 AND C(13)=l THEN LET H$='WH00SH" 

i IF 0BO13 OR C(13)=0 OR RH<>27 THEN GOTO 1630 
' LET R$!RH)='NN" 

! LET D$(RH)="STUDY WITH SECRET ROOH" 

i LET H*="Y0U BROKE THROUGH' / 

I RETURN C 

! IF RN<>32 OR C(14)<>1 OR 0BO14 THEN SOTO 1680 
i LET H$='G0ING DOWN.' 
i LET RH=RH-1 
) GOTO 1690 
l LET H$="NHERE TO ?' 

) RETURN 

i IF 0B=17 AND C ( 17) =1 AND C«8)=0 THEN LET H$=*IT WILL BURN YOUR HANDS 

) IF 0B=17 AND C(17)=l AND C(9)=0 THEN LET H»='HHAT WITH ?' 

> IF 0BO17 OR C ( 17) =0 OR C(9)=0 OR C(8)=0 THEN GOTO 1750 

) LET H$='IT CASTS A FLICKERING LIGHT' 

! LET F(20)=l 

) RETURN / 

) IF F (20) =0 THEN GOTO 1790 ( Perhapsyoucan 

) LET M$='EXT INSUI SHED' l think of a better verb I / 

) LET F(20)=0 ^thanunhght. 

) RETURN 

) IF 0B=26 AND C(16)=l THEN LET H«='HISSSS' 


Don’t forget, you can add 
extra verbs without adding 
extra subroutines. You 
could add LOOK for 
example and make it use 
the EXAMINE subroutine. 



think of a better verb 
than “unlight”. 


INITIALIZATION VERB 25 VERB 24 VERB 23 VERB 22 



DATA INPUT SECTION 


The data : Load the data in this order. (See page 40.) 


2290 LET H$=“0K“ r 

2300 LET F ! 18) =1 \ 

2310 LET F< 17) =1 

2320 LET F (27)=1 

' 2330 LET F (2) =1 
2340 LET F (26) =1 
2350 LET F (23) =1 
2360 LET LL=60 13 SPACES 

2370 LET RH=31 / 

2380 LET F«=* - 

2390 FOR 1=1 TO 6 
2400 PRINT I 

2410 INPUT L(I) 

2420 NEXT I 
y>430 RETURN 
~2440 DIN R$ (36,4) 

2450 DIN D$ (36,30) 

2460 LET V=25 V" 

2470 DIN V$(V, 9) \ 

2480 LET U=36 
2490 DIN OKU, 13) 

2500 DIN C(U) 

2510 DIN F(N) 

2520 LET 8=18 
2530 DIN L!6) 

2540 PRINT “DESCRIPTIONS" 

2550 FOR 1=1 TO 36 r- 

2560 PRINT I \ 

2570 INPUT OKI) 

2580 NEXT I 
2590 STOP 

2600 PRINT "ROUTES" 

2610 FOR 1=1 TO 36 
2620 PRINT I 
2630 INPUT R$(I) 

2640 NEXT I v - 

2650 STOP \ 

2660 PRINT “OBJECTS" 

2670 FOR 1=1 TO U 
2680 PRINT I 
2690 INPUT OKI) 

2700 NEXT I 

2710 STOP r- 

2720 PRINT “VERBS" V 

2730 FOR 1=1 TO V 
2740 PRINT I 
2750 INPUT VKI) 

2760 NEXT I 
2770 STOP 


DESCRIPTIONS \ 

ENTRANCE TO KITCHEN, KITCHEN WITH GRIMY 
COOKER, SCULLERY, DUSTY ROOM, REAR TURRET 
ROOM, CLOSET WITH COAT, BACK HALLWAY, DARK 
ALCOVE, SMALL ROOM WITH RUBBISH, SPIRAL 
STAIRCASE, WIDE PASSAGE, SLIPPERY STEPS, 

HALLWAY TO REAR, POOL OF LIGHT, VAULTED 
HALL, HALL WITH HUGE WOODEN DOOR, TROPHY 
ROOM, CELLAR ROOM, FRONT HALL, SITTING 
ROOM, SECRET ROOM, STEEP MARBLE STAIRS, 

DINING ROOM, VAULT WITH COFFIN, FRONT LOBBY, 
LIBRARY OF EVIL BOOKS, STUDY WITH DESK. HOLE 
IN WALL, COBWEBBY ROOM, VERY COLD CHAMBER, 
SPOOKY ROOM, FRONT PORCH, TOP OF FRONT 
TOWER. SLOPING CORRIDOR, UPPER GALLERY, 

BOAT HOU SE. SOGGY PATH 

ROUTES V -f "N 

— , The commas show 

where you should press 
SE, WE, W, SE, WE, W, NEWLINE between data 

NS, SE, WE, NWUD, SE, SWUD, TYPE THE 

NS, NSE, WE, WE, NSW, NS, \T J 

NSE, NSW, S, NSUD, N, N, — \ r— 

N, NE, W, NSE, WE, SW, C \\ £ 

N, WE, WE, NW, E, NW } 


OBJECTS \ 

PAINTING, RING, MAGIC SPELLS, GOBLET, SCROLL, 
COINS, STATUE, CANDLESTICK, MATCHES, 
VACUUM, BATTERIES, SHOVEL, AXE, ROPE, BOAT, 
AEROSOL, CANDLE, KEY, NORTH, SOUTH, WEST, 
EAST, UP, DOWN, DOOR, BATS, GHOSTS, DRAWER, 
DESK, COAT, RUBBISH, COFFIN, BOOKS, XZANFAR, 
WALL, SPEL LS 

VERBS V 

HELP, CARRYING?, GO, N, S, W, E, U, D, 

GET, TAKE, OPEN, EXAMINE, READ, SAY, 

DIG, SWING, CLIMB, LIGHT, UNLIGHT, SPRAY, 

USE, UNLOCK, LEAVE, SCORE 

STARTING LOCATIONS FOR OBJECTS V 

(You must type in this set of data each time you run 
the program.) 

30, 24,21,32,5,8, 

16, 26,2, 13, 14,36, 

18,11,35,3, 27,6 



Extra tips and hints 


| 1. Use integer variables 

On some computers you can put a % sign 
after number variable names to show that 
you only want to put integers or whole 
numbers in them (numbers without 
anything to the right of the decimal point 
that is). So variable V becomes V% and so 
on. You can do this on the BBC, TRS-80, 
Dragon, TRS-Color and Oric. It is useful to 
do this because it saves memory space and 
increases the speed by as much as 50% . 
The speed is particularly noticeable when 
the computer is executing long loops. 


| 2. Think about screen presentation 

If you have enough spare memory, you 
could improve the way the game looks on 
the screen. You could add a graphics 
routine for the opening title for instance and 
make the text flash on and off at particular 
points in the game, such as when the candle 
flickers or the ghosts appear. The text need 
not be printed at the edge of the screen, nor 
need it all be the same colour. You could 
make use of coloured borders and 
backgrounds too. 


3. Watch your spelling 

If you are not quite sure how to spell a word 
you want to use in the game, check it in a 
dictionary. Your computer doesn’t know 
how to spell and will store whatever you tell 
it in its memory. This could be very 
frustrating for the player who is using the 
correct version and keeps getting error 
messages because the computer doesn’t 
recognize the word. 


I 4. Spread the action 

Some adventure games are a bit boring to 
play because everything happens in the 
same place. Try to make sure there are 
46 interesting things all through the game. 


5. Use REM statements 


When you are writing a program as long 
and complicated as an adventure, it is a 
very good idea to put REM statements in 
front of each section. You are quite likely to 
get confused as to which section is which if 
you don’t. When you have finished the 
program, though, take the REMs out - they 
take up memory space, slow the program 
up and allow unscrupulous players to cheat. 


1 6. Use helpful variable names | 

Try to name your variables so that it is easy 
to remember what each one is e.g. OB for 
objects, MK for mistakes, and so on. If you 
have plenty of memory space and your 
computer will allow you, it is a good idea to 
use long variable names to help you 
remember what each variable is, e.g. 
instead of V use VERB. Make a list of your 
variables and what they are anyway, so you 
don’t mix them up while you are writing the 
program. 


[ 7. Keep it simple 

Don’t be too ambitious with your first 
games. A simple, well-thought-out game 
will be more fun to play than a confused, 
complicated one. Not everyone wants to 
play a game which goes on for days. 


I 8. Keep it friendly 

When you have written your game, look at 
the comments to make sure they are not 
ambiguous or misleading. Instead of “TOO 
DARK”, for instance, you could say “YOU 
NEED A LIGHT TO GO HERE”. Remember, 
something that is obvious to you will not be 
at all obvious to a player. Make some of 
your comments funny too as this will help 
the player feel the computer is really talking 
to him. 







Answers to puzzles 


Detective game puzzle (page 13) 

Here are some suggested solutions for the problems in the detective game. See how 
they compare with the solutions you thought of. 

1. You will only see the hair if you instruct computer to examine coat. You cannot take 
hair unless you have a clean envelope to put it in. 

2. You need a key to open the drawer, a magnifying glass to see the thread and a second 
clean envelope to put it in. 

3. You need plaster and a container of water to make a plaster cast of the footprint. 

4. You need talcum powder to show up prints and sticky tape to lift print off surface to 
take away. 

5. You need a portable blood analysis kit (described in game as a box containing bottles 
and other scientific equipment). 

6. You need a handkerchief to pick up the stick and a polythene bag to carry it in. 

Adventure brain teasers (page 15) 

Remember there are no “correct” answers to these puzzles. Here are some suggested 
solutions. 

1 . Lift the carpet and find a trap door. 

2. Use the handkerchief as a mask (assuming drowsiness is caused by a gas in the 
room), look inside rucksack and find a flask. Open the flask and find black coffee. 

Drink coffee. 

3. Read scroll (which is a proclamation to free the slaves). 

4. Throw the dessert (which happens to be custard pie) in the arch-villain’s face. Grab 
the remote control and escape. 

Puzzle (page 28) 

Here is how you can change the program to limit the number of objects that can be 
carried at one time. 

You need two new variables, here they are called CO (which stands for “carried 
objects”) and CL (which stands for “carrying limit”). Add these to the end of line 70 like 
this: 

70. . . :CO=0:CL=8 

You then need to tell the computer to add one to CO in the GET routine when the 
player picks up an object and subtract one from it in the LEAVE routine if he drops an 
object. Do this by adding to the ends of lines, 1010 and 1490 like this: 

1010. . . :CO=CO+l 

1490. . . :CO=CO— 1 

Now add a new line to the GET routine to check if CO equals the limit before 
proceeding with the rest of the routine. 

(CL need not be 8, but it cannot be less or the player would not be able to carry all the 
treasures to the finish.) 


Going further 

Once you have written an adventure, you could join the BBC Micro Adventure/Fantasy 
Club. This is a postal club and it provides a library of adventure and fantasy games written 
by members for the use of other members. To find out more, write to: 

BBC Micro Adventure Club, 29 Blackthome Drive, Larkfield, Kent ME20 6NR, England. 
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